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Microsoft C Professional Development System 


- New based pointers access far data with size 
and speed of a 16-bit pointer 

• Register parameter passing: ^fastcall passes up 
to 3 parameters in registers, and floating point 
values are returned on the coprocessor stack, 

■ Function-level control over optimizations. 

• Integrated inline assembler 

" Highly compliant with proposed ANSI standard 
(we pass 75 of 79 "Plum Hall" tests). 

• Incremental compilation in both DOS and OS/2, 

" Dramatically improved local code-generation. 

Programmer's Workbench : 

•Designedby professional programmers,for 
professional programmers. 

• Complete integration of edit, make, debug cycle 
in both DOS and OS/2, 

• New Source Browser provides information on all 
aspects of wur source code, 

• Microsoft C Advisor is an on-line reference for 
the environment, C Language, and Runtime 
Libraries. 

• New MAKE is now a full supereet of XENDC/ 
UNIX MAKE facility. 

• Specify all build options, including 

target environment from within 
development environment. 

• Takes advantage of OS/2 
for background operation of 
components—such as compilation. 

• Open architecture: 3rd party tools 
and libraries can be easily installed, 

Microsoft CodeView Debugger 

• Completely redesigned user interface. 

• Debugs nearly any size application on both 286 
and 386 machines under DOS by taking all but 
I5K of CodeView out of the 640K address space, 

• Multiple file debugging. 

• Multiple memory views. 

• Array browsing, 

• Automatic "locals'’ window. 

Includes OS/2 Presentation Manager Softset 

utilities. 

Advanced Programming Techniques Manual 


If you love the rush of adrenalin that comes 
with sudden acceleration, we’ve got a C that’s 
just your speed: the exhilarating new Microsoft® 
C 6.0 Professional Development System. 

Designed to get your blood racing in noth¬ 
ing flat with the fastest? slickest code available in 
the shortest, smoothest time possible. 

Thanks to some of the most sophisticated 
code optimizations around. 

With this C, you get everything from reg¬ 
ister-based parameter passing to a globally opti¬ 


mizing code generator to complete loop optimi¬ 
zations. Plus new super-efficient based pointers 
that access far data instantly. 

And your code isn’t all that moves faster. 

Whether you’re developing for MS-DOS? 
Microsoft Windows” or MS’ OS/2 Presentation 
Manager systems, our brilliantly integrated Pro¬ 
grammer’s WforkBench propels 

you through the creative proc- I __ 

ess with precision tools. I * 

Including a new souped- 
up CodeView'’ Debugger that 
not only debugs any size DOS 
or OS/2 application program, 
on any 286 or 386 machine, 
but also gives you data-brows- 
ing so you don’t have to constantly guess at values. 

To save even more time, our C Advisor is 
on-line and on-time whenever you need it This 
complete hypertext reference not only gives you 
sample coding solutions, but it even lets you copy 
and paste them directly into your program. 

If you want to review part of your handi¬ 
work, our Source Browser helps you find it with 
a full call tree that literally draws you a map. 

For a free white paper with more details, 
just call us toll-free at (800) 426-9400. 

Then get your hands on Microsoft C 6.0. 

The developmentsystem specially created 
for people whose only fear is being left behind 



Microsoft 

Making it all make sense 

* Lcmirrehensnc benchmark tests performed at Microsoft mmdMhz IBM PC/A V with RAM amt 80287coprocessor 
Customers mthi * the SO United Slates, evil (800)426-9400. Qaiamen in Canada, colt (416/ 673>763& Outside the US 
ami Canada, call 6 1990 Micmuifi CdrpomlmLA tl rights reserved. Microsoft the Microsoft kgo, MS-lKtS, 

MS anti CodeView are registered trademarks md Windows and Making it all make sense are trademarks of Microsoft 
Corporation PC/A T (S a registered trademark of International Business Machines Qirporatum 









WE HAVE WAYS TO 
MAKE YOU TALK 

(and let you listen in, too) 



‘Talf^to your modem and connect loith remote systems. 

Go online with ease with our new high-level modem control routines, 

Initialize, dial, answer, auto-answer, and auto-adjust for incoming baud 
rate. 

Let s talfcJUe transfer. 

XModem/YModem routines let you send and receive multiple files over multiple ports, If your program has 
ISR/TSR capability (as provided by our POWER TOOLS PLUS, C TOOLS PLUS, or Turbo C TOOLS), you can talk 
file transfer in the background while your foreground process talks data input, or database query, or whatever. 

The file transfer capabilities include IK packets, CRC error checking, YModem (multi-file transfers with file 
name and size preserved), automatic adaptation to Incoming packet size and error detection method. And 
we're talking fast—all file transfer routines have been optimized for maximum throughput. 

Let s talf^Basics. 

C ASYNCH MANAGER™ and ASYNCH PLUS™ retain the tried and true features which have made them the 
libraries of choice for completing asynch projects—buffered interrupt-driven input and output to multiple 
COM ports with speeds up to 19200 Baud, XON/XOFF protocol, hardware handshaking and more. 

C ASYNCH MANAGER supports Microsoft C version 4,0 and later, QuickC and atl versions of Turbo C, ASYNCH 
PLUS supports Turbo Pascal versions 4.0 and later and QuickPASCAL. Both products require DOS 2,00 or later 
and an IBM PC, XT, AT or PS/2 machine or true compatible. 

Let s talkjprice. 

Why pay more? Our ASYNCH packages are just $189, including complete source code, a comprehensive 
reference manual with extensive examples, sample programs and online help. 

'Turn tfiat serialcaBle into a party line loith ( Ul ( E c W232! 

Debugging serial communications doesn't have to leave you talking to yourself, 

New from Blaise computing: VIEW232™ turns your computer into a serial data 
analyzer that lets you listen in on the conversation between any two serial devices 
—and this party line provides a complete transcript of what was said! 

VIEW232 displays the data as it flows in both directions. And you can set the display 
format (6 formats supported) and trap predetermined character sequences. Save a 
whole transmission in a buffer, then browse through or search the buffer for a pattern 
or specific character, And you can save the data to disk or print it for later study, 

VIEW232 is easy to use. And we supply the cable, all for just $189! 

Let s tallitrac^record. 

Blaise Computing has produced a collection of tools over the years that are unsurpassed 
for reliability, flexibility, and ease of use, Call today for a free brochure on our complete 
product line. _ 

And ive 're talking£uaranteed. 

We offer a 30-day money back guarantee, If during the first 30 days you are not completely satisfied, well 
refund your money. 

BLAISE COMPUTING INC. 

2560 Ninth Street, Suite 316 Berkeley, CA 94710 (415) 540-5441 CIRCLE NO. 91 ON READER SERVICE CARD 



(800) 333-8087 p,ice f p “ H ^S Sl89! 
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The professional menu system in a graphics environment 
for TURBO C, MICROSOFT C, TURBO PASCAL 

graphics-MENU 


I type 
je bo 


prgpAi'f.y-MENU ™ from ISLAND SYSTEMS is a comprehensive library 
plus utilities package that allows the developer of graphics applica¬ 
tions to quickly create a user-friendly interface with menus, messages 
and forms. 

Most items draggable by mouse 
Menus can work with mouse or 
keyboard or both. 

■ CASE tools: 

MenuDesigner™ and 
Data Entry Designer™ 

{opt. add-ons) provide on 
screen WYSIWYG design 
environments for menu 
creation and include 
automatic code generation. 

• Utilities included in the 
base package: Cur Ed it™ 
creates custom cursor icons: 
ColorCustomizer™ allows 
complete color specification via 
an on-screen pailette. 


message boxes. 

Mouse support functions and 
geometric functions 
such as point 
rotation, distance, 
degrees/radians 
conversion, true 
4-quadrant arctan. 

EMS support 
Foreground/ 
background task 
capability 
Automatically 
saves/restores 
underlying graphics image 
Shadows'ror 3d effect 


hoi iAnq '.oils? 


Data Entry 


The Data Entry. Module 1M is a specialized library (optional add-on to 
£/ «/>/»ts-MENU) to enable the developer to easily create forms ty| 
menus. A high degree of flexibility lias been built-in to allow "hoo 
into the library for all types of data entry applications. 

> dBASE-like string specification ■ CASE tool: Data Enti 
■ real-time data 
checking 


data type validation 
automatic field 
movement 
several types of 
form exit conditions 
help message facility 
professional string 
editing 


ry 

Designer (optional) 
available to quickly 
create complex forms 
menus on-screen with 
auto code generation. 
Price for Data Entry 
Module with Data 
Entry Designer just 
$99 [Source Available. 


{-MENU works with MetaWindow (from 
aphlcs Software) or BGI (Borland 
Graph ics lnlerf ace). 

Language Versions available for Turbo C, 
Microsoft C 1 Turbo Pascal 

Base package price ts $99 (BGI versions) 

5149 (META versions) 

Several add-on options and source available. 

Call lor additional information or pricing. 

We accept Mastercard and VISA 
** 30 day money back guarantee *■ 


CALL: (617) 273-0421 
FAX: (617) 933-1152 

M AVAILABLE 


DEM 


Island. Systems 


7 Mountain Rd. Burlington MA 01803 
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C Network Compiler. 

C Network Compiler Run. 

C Network Compiler Run 386. 


Introducing 
C Network 
Compiler/386. 



Introducing 
another first from 
Novell-the first net¬ 
work compiler for 
developing distribut¬ 
ed applications. 

C Network 
Compiler/386 
gives you the fast¬ 
est, most stream¬ 
lined code you’ve 
ever seen,running 
on NetWare" 386, 
the fastest most 
efficient network operating sys¬ 
tem we’ve ever developed. 

C Network Compiler/386 is 
a complete and integrated set of 
NetWare 386 programming tools 
that generates 32-bit, native¬ 
mode 386 code. Now you can 
use a standard programming 
tool to conquer the complexities 
of building server applications. 

And for building client 
applications, we offer the DOS 
version of C Network Compiler 
for the entire 80x86 processor 
family. Both compilers are based 


on the latest technology from 
WATCOM Systems Inc., and are 
optimized for use with NetWare. 

Besides the powerful ANSI 
C compiler, enhanced debug¬ 
ger, linker, and other utilities, 
with our network compilers you 
have the whole library of NetWare 
application programming 
interfaces, including Btrieve® at 
your command. 

That gives you a direct link 
into NetWare, the leading net¬ 
work operating system with the 
world’s largest installed base of 


network application users. 

Call us and see how fast our 
C Network Compilers can make 
your applications run. And start 
writing applications today that 
will satisfy the network comput¬ 
ing needs of the next decade. 

C Network Compiler—US$695 
C Network CompiIer/386—US$995 




NOVELL 


For network solutions, 
you should be seeing red. 


Call before you write. 512-346-8380 

©1989 Novell, Inc... Novell Develop men I Products., #917, P.G. Box 9802, Austin, Texas 78766 
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EDITORIAL 


It Takes More 
Than Nerve 


T he biggest Fear of those who champion neural networks is guilt-by-compa risen with the 
artificial intelligence camp. They're not alone in this. Object-oriented advocates, as well as 
most other popular technologies that make the front pages of pseudo-technology news 
tabloids, don’t want to loe snake-bit by the same type of hype that poisoned AI development. The 
frontal assaults of AI and expert systems, fueled by big money and bigger promises, have been 
nonexistent for neural nets and, although those neural net developers tlying to eke out a living 
might disagree, the lack of venture capital has probably been a blessing. Less hype buys more time, 
at least as long as enough money comes in to keep the lights turned on. 

Nevertheless, there continues to he a tot of interest and development in neural nets, A survey 
recently published by Future Technology Surveys of Madison, Geoigia listed over 200 companies 
and organizations currently producing neural-related products or undertaking serious neural net 
research. And it just isn’t the little guys doing all this research, either. 

Among the big outfits testing the neural net waters is Intel. Early last summer, a ten-mem lx-r Intel 
engineering team, under the direction of Mark Holler, rolled out an Electronic Trainable Artificial 
Neural Network (ETANN) chip that is capable of up to 2 billion multiplies and accumulates per 
second. To put the chip to work, Holler and his crew have built a prototype ETANN-based board 
that plugs into the PC AT bus; Mark Lawrence and the folks at California Scientific (developers of 
BrainMaker, a neural net simulation package for PCs) are developing the software tools that Jet you 
use the system. There's also a rumored Intel research project that will pul a version of the ETANN 
board into an i86(J-based system that can achieve 33 billion connections per second. 

Intel isn’t the only big IC manufacturer poking around in neural nets. A few months ago. Sharp 
introduced a neural-network image-processor chipset that simulates human vision and, the 
company claims, supports PC applications at speeds up to 700 MIPS. 

These examples illustrate another trend in the neural net world — a transition from software to 
hardware. Within ten years, or so say the experts, more neural nets will lie implemented in hardware 
than software. Until then, engineers will begin to overcome many challenges, including the 
implementation of back propagation in hardware and the parallelization oi the entire scheme, 

So where does this leave software developers? Fur one tiling, a whole new class of development 
tools is in the offing, designed for specific neural net hardware implementations. Another type of 
tool will be like that described by Andy Czuchry in this issue, whereby designers can match the 
right neural model with the task at hand. Nor will the simulators go away; they may he used to 
simulate the right net with appropriate learning, then generate source code to be frozen in silicon. 


In her keynote address at Miller-Freeman’s SD’90, Smalltalk pioneer and ParcPlaee System s 
president Adele Goldberg expressed a concern similar to that I wrote alsout in this space 
last month — the spread of litigation and its effect on the software industry. 

Although her talk concerned a wide variety of legal issues — from intellectual property to the 
emerging problem of who owns the design and implementation of'objects, as in object-oriented 
programming — she spent a fair amount of time on copyrights and patents. Lawyers will always 
tell you two things," she said, 'try to patent or copyright whatever you do.” She went on to describe 
a speech she gave to a group of lawyers, where she was asked how to convince software developers 
to protect their works. My answer was simple." she said. “Tell them to protect their work so that 
they have the choice later on to give it away. Not doing so, she explained, opens the door for 
someone to come along and take it away. But Goldberg wasn’t engaged in lawyer-hashing, no 
matter how easy that is. What she was presenting was a persuasive argument for open standards 
and open licensing. She pointed out that among the problems litigation forces upon us are the 
waste of time and money, the fear of alliances, the inability of entrepreneurs who lack clear patent 
or copyright protection to attract investors, and the expense of starting up new businesses* 

One of the main points of her talk was simply to "reassert an often unstated goal of our 
industry — to share ideas and to challenge one another with our innovative expressions of those 
ideas.'' Nicely put. 


And no, the favored horse running in the first race at Bay Meadows racetrack the other night 
wasn’t our official mascot, even though the nag s name was “Dr, Dobbs. Although, he losL by a 
nose in a photo finish, the good Doctor is surely chomping at the bit to gel into the next race. Well 
keep you posted on his progress this season. 





Jonathan Erickson 
editor-in-chief 
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QNX, 

The OS for over-achievers' 


QNX programmers have a decided advantage. 

You see, people who use QNX enjoy the 
freedom that comes only with a flexible, 
modular OS. They appreciate the elegance 
of a message-passing architecture. And 
they marvel at the fact that QNX runs so 
lean—under 15 OK—yet out-performs any 
other PC operating system. 

QNX users never worry about whether their 
applications will make it at runtime, because 
they know QNX has proven itself again and 
again in the real world. 

It’s no wonder that qnx users have achieved 
so much since the product was first released 
for the PC in 1982: over 80,000 systems 
installed in 47 countries world-wide, in all 
kinds of applications—from making cars 
to selling books to handling online credit 
card transactions. 

One reviewer dubbed QNX “The multi- 
everything OS.” Now, you might expect 


multiuser and multitasking, but realtime? 
And integrated networking? And true 
distributed processing? Best of all, these 
terms take on a new meaning with qnx. 

Multiuser, for instance, means up to 32 
terminals per micro. Multitasking 
cashes out as 150 tasks per machine. 
Realtime means not only priority-driven, 
preemptive task scheduling, but also speed: 
at 6,896 task switches/sec on a 16 mhz 286, 
QNX is at least a full order of magnitude 
fester than a typical UNIX system. Inte¬ 
grated networking means you won’t 
need yet another layer of software to set up 
a LAN, and you can use any mix of 
Intel-based micros—from vintage ’81 pcs 
to PS/2 s. 

Distributed processing with QNX 
sounds too good to be true. But it is -.Any 
task can access any resource—proems,, 
files, devices, even CPUs—without going 
through the bottleneck of a central file server. 


Besides the satisfaction that qnx developers 
get from using a fast, powerful, and flexible 
OS, did we mention that they also enjoy 
free technical support? 

If you’re wondering why you don’t already 
know all about this great OS, you could try 
asking the over-achievers who are smugly 
guarding the secret of their success. 

Better yet, give us a call. We’ll tell you 
everything you need to know to become an 
over-achiever yourself. 



For more information or a free demo disk, 
please phone (613) 591-0931. 


Quantum Software Systems Ltd., 175 Terrence Matthews Crescent, Kanata, Ontario, Canada K2M1W8 

QNX is i registered trademark of Quantum Software Systems Inf., UNIX is ■ registered trademark trf AIJfcT PSV2 is t registered Irttfemai'k at InienitUiWial Business Mstbines CstfjKjnUiOO 

© 1989 Qturturi Software Systems Ud 




LETTERS 



Faster A nima tion 

Dear DDJ\ 

1 enjoyed Rahner James's article on “Real 
Time Animation” in the January 1990 
issue of DDJ. Ever since the price of 
EGA devices dropped, magazines have 
been filled with how-to articles, but 
few have covered icons or sprites. In 
1986 l ported a collection of graphics 
routines from my Zenith 100 system to 
the EGA. These routines are now part 
of an icon development environment 
called “ProGraphx Toolbox,” available 
from Stan wood Associates. 

Speed is definitely the key to success 
in graphics, and Mr, James's routines 
definitely are fast. In my routines I have 
come up with another approach, which. 
1 believe, is slightly faster in displaying 
icons. Since the EGA is latched, you 
must determine which planes will be 
accessed during a write, a clock cycle 
consuming process. Mr. James’s rou¬ 
tines store one byte per pixel, enabling 
128 colors and an intensity bit. If the 
format of the sprite were laid out plane 
by plane rather than pixel by pixel, the 
function could set the registers for a 
plane and then write all the data for 
that plane. The function would con¬ 
tinue plane by plane, only setting up 
the register once per plane per icon. 
Additionally, the EGA does not allow 
bit access, So why not place a byte's 
worth of data on the screen during 
each write rather than only one new 
bit? I enjoy seeing quality articles every 
time T open a new issue of DDJ\ Keep 
it up! 

Pederjungck, Sta n wood Assoc. 

Chicago, Illinois 

On Location 

Dear DDJ, 

The excellent article “Location is Ev¬ 
erything," by Mark Nelson, (January, 
1990) was most timely. Once again DDJ 
came up with just what 1 wanted just 
when 1 needed it, I think, however, 
there is a small problem with the code. 

Mark uses the exe header field "Dis¬ 
placement of stack in Paras” fOe) to 
locate the start of the initialized data 


area. This works only when the amount 
of initialized data is less than one para¬ 
graph long since the stack displace¬ 
ment corresponds to the end of the 
initialized data area. In the general case, 
the program needs the starting para¬ 
graph. I was able to easily find this 
value by parsing it out of the .MAP file. 
Using this value in the relocation func¬ 
tion causes the program to perfonn as 
advertised. 

/* input_base_data_segment is a global 
unsigned int */ 

A data_seg is declared as char 

data_segl811 7 

/* map_flie is a FILE * to the .MAP file 
created by 7 

/* Scan the .map file for the word ”BSS" 

V 

while(strcmp(data_seg T "BSS") ! = 0) 
fseanf(map_file, data_seg); 
/* The next field in the file is the loca¬ 
tion of the 7 

/* data. V 

fscanf(map_file, ”%s'\ data__seg); 
data_seglstrlen(data_seg>l] = ’\0'; 

Aklll the TT7 
input_base_data_segment = 

htoi(data_seg)» 4; 

in die function process^relocattonjta - 
ble( ), replace all references to the vari¬ 
able Jirst_data_segmeni_ in_exe_ file 
w i t h input_ hase_da ta_seg men t. 
Stephen J. Beaver 
Winehester, Vi rgin ia 

Mark responds: As Stephen Beaver notes, 
there is a field in the header portion of 
cm EXE file that tells me where the start 
of the program stack segment is lo¬ 
cated , / use this field to determine where 
RAM data starts in the EXE file . Mr. 
Beaver must have taken note of the 
lines in my START. ASM file shown be¬ 
low , Because the stack segment follows 
the DATA, BSS, and CONST segments, 
Mr. Beaver concludes that the value / 
calculate for the start of RAM actually 
points past all these segments. How¬ 
ever i there is an additional segment 
definition line a little farther down in 


the START ASM file: 

DGROUF GROUP .CONST, .BSS, 
_DATA, .STACK 

This statement causes the compiler and 
linker to gather alt four of these seg¬ 
ments together into one segment. This 
means that all four segments are col¬ 
lected together and the pointer to the 
start of the stack segment wilt actually 
point to the start of DC ROUT which 
will be at the start of the _CONST seg¬ 
ment: So , if you use the S7 ART ASM 
startup file as 1 required , the LO¬ 
CATE.EXE program will work properly. 
By the way , Mr Beaver "solved" this 
problem by modifying my LOCATE pro¬ 
gram to read in a MAP file that the 
linker has produced. Reading in MAP 
files to drive a Locate program is not a 
had approach. In fact, Jensen & Part¬ 
ners International are providing a 
TSLOCATE utility with their new 
TopSpeed C compiler, which does just 
that. I chase to amid this approach for 
a couple of reasons. First, there is no 
standard MAP file format. Every linker 
is free to create their own format, and 
a good LOCATE program would be 
forced to continually adapt to these. 
Second, a program using this approach 
is vulnerable to errors caused when the 
MAP file is not actually the one from 
the latest link. Because the information 
/ wanted was in the EXE file, and the 
EXE format is standardized across alt 
MS-DOS compilers, l elected to not read 
in the MAP file. / hope this clears up 
some of the confusion. Dealing with 
program segments at a low level is usu¬ 
ally concealed from HLL programmers 
by the compiler for which we can alt 
give thanks . 

Random Structures 

Dear DDJ, 

This is in response to the December 
1989 letter by Dan W. Crockett. He is 
treating the term “structured" and the 
term “modular" as being equivalent, A 
structured module, program, or system 
(continued on page 12) 


.TEXT 

SEGMENT BYTE PUBLIC ’CODE' 

TEXT 

ENDS 

END OF ROM 

SEGMENT PARA PUBLIC 'STARTUP CODE' 

END OF ROM 

ENDS 

CONST 

SEGMENT PARA PUBLIC 'CONST' 

CONST 

ENDS 

BSS 

SEGMENT WORD PUBLIC ’BSS’ 

BSS 

ENDS 

DATA 

SEGMENT WORD PUBLIC DATA' 

DATA 

ENDS 

STACK 

SEGMENT WORD STACK STACK 

MYSTACK 

DB 512 DUP (?) 

STACK 

ENDS 
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Bill Babcock 

Markeii)tg Informatian 
Center Manager 
Sage Software 


Q. How can you make sure 
users love your program 
before you write it? 

A. Demo II, Sage and you. 


True story. I'm developing a 
marketing info system at Sage. 
Big Project. I’ve been working 
with the users for months. I’ve 
got notebooks full of data struc¬ 
tures, screen drawings, report 
requirements, and menu designs. 

“We 1 re two weeks into coding 
when my boss gives me a copy of 
Dan Bricklin’s™ Demo 11“ ‘We’re 
going to acquire this,’ he says. So 
I play with it over the weekend. I 
prototype my project. On Monday 
I proudly demo my prototype to 
the users who completely agreed 
with my paper plans. 

“They hate it. Vital infor¬ 
mation is not accessible from 
screens where it’s needed; fre¬ 
quently used functions are hidden 
deep in menus; the entry flow 
doesn’t fit the work flow. I don’t 
know whether they did a bad job 
of telling me what they wanted or 
I did a bad job of listening. 

Polytrtm has been 
acquired by Sage 
Software, Inc. 

The same team 
that supports and 
develops the 
products you are 
fa m ilia r with, no w 
supports Demo //. 



“ But with a few hours of 
work I fix the problems in the 
prototype. They try it again. Big 
smiles. The project is back on 
track. They love it. 
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Demo II can build interactive demos so 
realistic that users can 't tell them from 


finished software. Above is an example of a 
CUA interface design that witt be running 
on both mainframe terminals and PS/2s, 

“The same hands-on demo 
with real code would have hap¬ 
pened months into the project. 
We would have trashed a lot of 
work or finished with a system 
nobody wanted. Demo 11 saved 
my project and my time. Now I 
know why it's so popular. J J 

Dan Bricklin’s Demo 11 can do 
more than just save you time and 
trouble. Use it to provide aston¬ 
ishingly realistic demos of appli¬ 
cations - self running, interactive, 
or both. Use it to show manage 


ment and users that your project 
is on track. Use it whenever you 
need to communicate how a pro¬ 
gram will look, feel, and respond 
without providing the real code. 
And though Demo II runs on MS- 
DOS, many programmers use it to 
create prototypes for mainframe 
and minicomputer applications. 

Even non-programmers find 
it easy to learn, but Demo II has so 
much capability and stores demos 
so compactly that it’s widely used 
for computer-aided instruction, 
replacing CA1 authoring systems 
that cost thousands of dollars. 

Don’t wait until your care¬ 
fully researched and brilliantly 
coded project turns out to do the 
wrong thing the wrong way. The 
time, the grief, and the reputation 
you’ll save are your own. 



U.S. List Price with 
unlimited run-time 
distribution rights. 


1 - 800 - 547-4000 

30 Day Money Back Guarantee 



S O F T W A RE 


Dan Brieklin's is a reg, trademark of Daniel Brick tin, Requires - 512K IBM PC compatible. Mono., CCA. EGA. VGA or Hercules, MS-DOS 2.0 or later. 
Sage Software, Inc., 1700 NW 167th Place, Beaverton, OR 97006, (503) 645-1150, Fax (503) 645 4576, Inti (301) 230-3307. 
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Programmer's Paradise ... for 



5C*#Y, NO "BEADS OR COCONUTS, BUT WE ACCEPT 
ALL MAJOR CREDIT CAROS AS WELL A5 COWlPWNY 
CHECKS & PQ’5 fROM 0UN.1FYIN6 ORGANIZATIONS 


J 


WE'LL MATCH NATIONALLY ADVERTISED PRICES. 

LIST OURS LIST OURS 

C++ 


38b CONTROL PROGRAMS 


D ESQ view 306 

190 

169 

Microsoft WindowE/386 

195 

139 

VM/306 

245 

199 

VM/386 Mu It r-User 

895 

819 

38b DEVELOPMENT TOOLS 


386 ASM/LINK 

495 

435 

La hey F77L-EM/32 (w/ OS/1B6I 

1090 

975 

Novell C Network Compiler/386 

995 

779 

Paradox/386 

895 

629 

WATCOM C 7.0/386 

895 

799 

ASSEMBLY LANGUAGE 



Advantage Disassembler 

295 

279 

ASMFJow 

99 

B9 

ASMTool 

90 

80 

MS Macro Assembler 

150 

105 

OPT ASM 

125 

109 

Re:Sourte 

150 

129 

Source* w/ P re-Processor 

140 

125 

Turbo Assembler/Debugger 

150 

105 

Visible Computer: 80286 

100 

89 

BASIC COMPILERS 



MS BASIC Prof. DeveE. System 

495 

349 

Power Basic 

110 

99 

QuickBASIC 

99 

69 

True BASIC 

TOO 

69 

BASIC UB5/UTILITIES 



db/i IB 

139 

121 

DiaLogic 

79 

70 

Graph Pak 

79 

70 

Graph Pak Professional 

149 

125 

LaserPak 

79 

70 

P.D Q 

99 

89 

FboBas 

135 

125 

ProBas HyperHelp Toolkil 

99 

94 

proBas Tdecomm, Toolkit 

75 

70 

ProBas Toolkit 

99 

94 

ProMath 

99 

94 

ProScreen 

99 

89 

QBase and Qulckscreen 

149 

125 

QuickComm 

139 

125 

QuirkMenu 

59 

55 

QuickPak 

79 

70 

QuickPak Professional 

149 

125 

QuickPak Scientific 

79 

70 

QuickScreen 

79 

70 

Quick Windows Advanced 

149 

125 

QuickWindows Advanced Corp. 

500 

445 

C COMPILERS 



C Network Compiler 

695 

525 

Lattice C 6,0 

250 

155 

Microsoft C 6.0 CALL 

CALL 

M5 QuickC 

99 

69 

MS QuickC w/ QuickAssembler 

199 

139 

Top Speed C 

199 

179 

□05 Professional 

399 

359 

OS/2 Professional 

495 

445 

Turbo C 

150 

99 

Turbo C Professional 

250 

159 

WATCOM C 7.0 

395 

319 


Guidelines C-H- 

295 

269 

NOPC++ 

495 

479 

Zoned i C++ Debugger 

150 

129 

Zortech C++ 

200 

165 

Developer's Edition 

450 

399 

Zortech C++- Toots 

150 

129 

Zoflech C++ Video Course 

500 

449 


t-C COMMUNICATIONS 


Breakout II 

125 

99 

C Asynch Manager 3.0 

109 

139 

Essential Communications 

329 

259 

Greenleaf Cnmm. Library 

299 

215 

Greenleaf VJewComm 

559 

475 

SilverComm C Async Library 

249 

209 

View-232 

189 

t49 


C-FILE MANAGEMENT 

Btrieve 

Btrieve for DOS 1.1 N el works 

C-Index Plus 

C ISAM 

Codehase IV 

CQL w/ PASS 

r-[nee 

dBC III 

dBC III Plus 

db_FILE Bundle 

Essential B-Tree w/ wjune 

FairCorn Toulbox Prof. Edition 

Fa if Com Toolbox - Special 

Informix Products 

Xtrieve PLUS 


C-GENERAL LIBRARIES 


C TOOLS PLUS/fe.n 

T49 

109 

C Utility Library 

249 

175 

Greenleaf Functions 

229 

159 

Greenleaf SuperFunctions 

299 

209 

Power Search 

149 

99 

Turbo C TOOL5/2.0 

149 

109 

C SCREENS 

C-Worthy w/ forms and source 

495 

CALL 

Greenleaf Data Windows 

395 

309 

Hi-Screen XL 

149 

129 

JAM 

595 

529 

Panel Plus 

495 

395 

Power Screen 

149 

109 

Vermont Views 

CALL 

CALL 

Vitamin C 

225 

165 

VC Screen 

149 

115 

C-UTILITIES/OTHER 

Clear + 

200 

169 

C-Terp 

300 

219 

Code Runner 

149 

135 

Heap Expander 

80 

70 

HyperWindows 

99 

90 

Norton Guides for C 

100 

65 

PC-lint 

139 

109 

PCYACC Professional 

495 

469 

TimeSIrcer 

295 

279 

w/ source 

1000 

899 


LIST OURS 

COBOL LANGUAGE 


Micro Focus: 


CGBQL/2 w/ Toolset 

iaoo 

1499 

Personal COBOL 

149 

129 

MS COBOL 

900 

629 

Realia COBOL 

995 

849 

SCREE NTO 

400 

375 

CODE GENERATORS 



C Source 

395 

299 

Logic Gem 

99 

89 

Matrix Layout 2.0 

200 

169 

PROC 

399 

339 

DATABASE DEVELOPMENT 


Clarion 2,0 

695 

499 

Clipper 5.0 

695 

519 

dBASE IV 

795 

489 

dBFast/FLUS 

249 

219 

dGf 

195 

179 

HashTools! 

89 

79 

FoxPro 

795 

635 

Magic PC 

299 

249 

R&ft Report Writer 

150 

129 

R&R Code Generator 

150 

129 

Say What?’ 

50 

45 

SFlverComm Library 2.0 

189 

165 

Inm Rettig’s Library 

100 

00 

UI2 Version Two 

595 

479 

DOCUMENTING/ 



FLOWCHARTING 



Ciear+ 

200 

169 

C ’Clearly 

130 

115 

Flow Charting ||+ 

229 

185 

Interactive Easyflow 

150 

125 

Paginate 

100 

90 

Source Print 

99 

89 

The Documentor 

295 

245 

Tree Diagrammer 

99 

89 

EDITORS 



BRIEF 3.0 

199 

CALL 

Edix 

195 

165 

EMACS 

325 

265 

Epsilon 

195 

138 

KEDIT 4.0 

150 

125 

MK5 Vi 

149 

129 

Multi- Ed il 

99 

89 

Multi-Edit Professional 

179 

T59 

Norton Editor 

75 

59 

SUCK Editor 

195 

T75 

SPFyPC 

245 

199 

VEDTT PLUS 

185 

TT5 

Vq* 

ISO 

135 

FORTRAN LANGUAGE 



Grafmalic 

T3S 

119 

Lahey F77l 

595 

529 

Lahey Personal FORTRAN 77 

95 

89 

MS FORTRAN 

450 

299 

Plolmatk 

135 

119 

RM/FORTRAN 

595 

499 

GRAPHICS LIBRARIES 



Baby Driver 

250 

199 

Essential Graphics 

399 

279 

Font-Tools 

ISO 

119 

Font Window 

125 

109 

Graphic 5.0 

395 

319 

CraphicvMENU 

195 

175 

Data Entry Design 

99 

89 

Data Entry Module 

59 

53 

GSS Graphics Devel. Toolkit 

595 

509 

HALO 

395 

279 

HALO Window Toolkit 

595 

419 

Icon-Tools/Plus 

150 

119 

Menuet 

250 

199 

Meta Window 

250 

209 

Meta Window Plus 

325 

269 

PCX Effects 

99 

B9 

PCX Programmer’s Toolkit 

195 

175 

PCX Text 

149 

135 

Turbo Geometry Library 

200 

179 

LINKERS/LIBRARIANS 



Plink86plus 

495 

395 

PolyLibrarian II 

149 

135 

.RTLink 

295 

265 

RTLink/Wus 

495 

419 

MODULA-2 



LOGITECH Modula-2: 



Compiler Pack 

99 

75 

Development System 

InpSpeed Modula-2: 

249 

199 

B-Tree Toolkit 

149 

135 

Communications Toolkit 

149 

135 

Compiler kit 

too 

89 

DOS 3-Pack 

200 

179 

NETWORK PROGRAMMING 

Above LAN 

495 

395 

Btrleve/N 

595 

459 

Novell C Network Compiler 

695 

559 

dBASE IV LAN Pack 

995 

645 

Fox BASE +/LAN 

595 

479 

NetWare SQL 

595 

459 

Paradox LAN Pack 

995 

697 

Remote Procedure Calls 

950 

029 



LIST OURS 

OS/2 TOOLS 

Brief 

199 

155 

Btrieve 

595 

449 

CA5EPM 

CALL 

CALL 

Epsilon 

Greenleaf Data Windows 

195 

395 

159 

330 

MK5 LEX :YACC (OS/2) 

399 

339 

MK5 Toolkit (DOS & OS/2) 

399 

339 

MS OS/2 Pres. Mgr. Softser 

150 

105 

MS OS/2 Pres. Mgr, Toolkit 

500 

349 

MultiScope 

299 

229 

Panel Plus 

495 

395 

PC-fint 

139 

101 

PCYACC 

395 

359 

Small talk/V PM 

495 

395 

Vitamin C (05/2) 

225 

165 

XVT/PM 

595 

509 

PASCAL LANGUAGE 

Asynch PLUS 

149 

115 

B-tree Filer 

125 

99 

MS QuickPASCAL 

99 

69 

Obfect Professional 

150 

119 

Power Tools PLUS/5.0 

149 

109 

Topaz 

75 

67 

Turbo Analyst 

99 

79 

TurboMAQC 

199 

179 

Turbo Pascal 5.5 

150 

99 

Turbo Pascal 5.5 Professional 

250 

169 

Turbo-Plus 5.5 

199 

TS9 

Turbo Professional 5,0 

125 

99 

PROTOTYPING 

Dan Brieklln's Demo 11 

195 

159 

Instant Replay HI 

150 

135 

Proto Finish 

300 

269 

Show Partner F/X 

350 

319 

Soft Derno 

80 

70 

TRANSLATORS 

Bas_C Commercial 

375 

323 

dllx Translator 

550 

467 

FOR C 

575 

519 

PROM ULA, FORTRAN 

450 

399 

WINDOWS (MS) TOOLS 


Actor 2.0 

699 

559 

CaseiW 

795 

759 

C-Tuik/Views 

450 

375 

dB F asyWindows 

249 

229 

DrafugCoder 

499 

479 

MS Wmdnws Development Kit 

500 

349 

RfTlow 

79 

69 

Whitewater Resource Toolkit 

195 

169 

WinTrieve 

395 

339 

ADDITIONAL LANGUAGES 


API "PL US 

695 

549 

Janus Ada/Compifer System 

300 

269 

Lattice RPC 

1600 

1469 

Meridian AdsStudent 

50 

45 

Meridian Ada Developer's Kit 

1095 

985 

MKS AWK 

99 

85 

Personal Rexx 

150 

139 

5ma Ilia Ik-80 086) 

595 

535 

Smalllalk/V 

100 

85 

Smalltalk^ 286 

200 

169 


NEW RELEASES 

SECOM by Secure 
Communication Technologies 

SECOM is a secured encryption 
communications solution for PCs, 
SECOM supports IBM and IBM 
compatibles and gives you the ability lo 
securely exchange mail, flies and fax's 
while communicating bidirectionally, 
SECOM is DES approved and includes 
an Auto Session Key System, 

List: $300 Ours: $269 

Norton Backup 

by Peter Norton Computing 

Speedy, reliable and easy (o use. Heads 
(he hard disk and writes to a floppy 
simultaneously, Norton Backup can 
restore from severely damaged disks. 
Saving and restoring can lx- done 
quickly by pointing and shooting 
through organi zed pop-up windows. 
List: $149 Ours: $99 

Actor 2.0 

by The Whitewater Group 

Create windows applications in 
signjfkanllv less time than it takes in 
C. Aclor 2.0 adds ihree new features: 
ancestor binding, class variables and 
class initialization. 

List: $699 Ours: $559 


245 10s 

595 449 

195 175 

225 209 

295 219 

195 349 

195 315 

250 219 

500 439 

295 249 

199 149 

1095 709 

695 509 

CALL CALL 
595 459 
















Service, Selection, Savings 4 ^°$ 99 


Borland Spring Sale 

List Ours 

Paradox 

725 

479 

Sidekick Plus 

200 

139 

Turbo Assemhler/Debugger 

150 

99 

Turbo C 2,0 

150 

99 

Turbo C Professional 

250 

159 

Turbo Debugger & Tools 

CALL 

CALI 

Turbo Pascal 5-5 

150 

99 

Turbo Pascal Professional 

250 

169 


LIST OURS 

APPLICATION SOFTWARE 

COMMUNICATIONS 

BLAST 

Carbon Copy Plus 
DeskUnk 
Laplink IN 
PC Anywhere? Ill 
Pro to mm Plus 
SideTalk 

DESKTOP PUBLISHING 

Adohe Illustrator 
Cone! Draw! 

Gem Desktop Publisher 
HALO DPE 
Lattice HighSlyle 
MKS SQPS 
PageMaker 
Ventura Publisher 

MATHEMATICS 

Derive 200 179 

MathCAD 495 315 

Mathematica 38b 695 625 


SCIENCE & ENGINEERING 


AutoCAD Release 10 

3000 

CALI 

AufoSketch 

150 

95 

ChiWriter 

150 

129 

Control System Toolbox 

495 

375 

CSS 

495 

469 

DADiSP 

895 

759 

Design CAD 3-D 

400 

292 

Drafix Windows CAD 

695 

CALI 

EXACT 

475 

380 

Generic CADD Level 3 

300 

179 

LABTECH Acquire 

195 

179 

LABTECN Chrom 

995 

779 

LABTECH Notebook 

995 

779 

MICRO-CAP II! 

1495 

1269 

Oread PCB 

1495 

CALL 

PC TEX 

249 

229 

SCHEMA 11+ 

495 

449 

STATGRAPHICS 

895 

586 

Tango CAD Pack 

995 

949 

Tango PCB Series II 

595 

559 

TECH‘GRAPH* PAD 

395 

319 

T 1 

595 

479 

UTILITIES 

366 MAX 

75 

66 

386 MAX Professional 

129 

115 

above DISC 

119 

84 

Command Plus 

130 

109 

f ASTRACK Pius 

189 

109 

Head Room 2.0 

130 

109 

Help Build 

249 

179 

MACE COLD 

149 

129 

Magellan 

139 

99 

Manifest 1.0 

60 

53 

Memory Mate 

70 

47 

MKS Toolkit 

249 

199 

Move'em 

89 

79 

Norton Commander 

89 

58 

Norton Utilities 

100 

65 

Norton Utilities Advanced 

150 

99 

PC/Tools Deluxe 

129 

80 

Pizazz Plus 

149 

79 

Q EMM/386 

60 

55 

QRAM 

80 

69 

Spin Rite 

89 

69 

XT reePro 

129 

109 


PRODUCTS BY VENDOR 
DIGITALK 


Smalftalk/V 

100 

85 

Com mu n leal Ions 

50 

45 

EGA/VGA Color Extension 

50 

45 

Goodies HI, #2 or #3 

50 

45 

Smalltalk*/ 286 

200 

169 

Smalltalk^ MAC 

200 

159 

Smalllalk/V PM 

495 

395 


695 409 

595 399 

299 1&3 

195 139 

375 319 

495 479 

795 509 

895 525 


250 225 

199 129 

170 129 

150 99 

145 99 

75 50 

120 90 



LIST OURS 

ICC 



VM/386 

245 

199 

VM/386 Multi-User 

895 

819 

VM/386 Multi-User Starter 

395 

359 

VM/386 NetPak 

150 

119 

MICROSOFT 



MS BASIC Prof. Devel. System 

495 

349 

MS G 

495 

349 

MS COBOL 

900 

629 

MS FORTRAN 

450 

299 

MS Macro Assembler 

150 

105 

MS OS/2 Present. Mgr. Toolkit 

500 

349 

MS OS fl Softset 

150 

105 

MS Pascal 

300 

209 

MS Programmer's Library 

395 

275 

MS QuickBASIC 4.5 

99 

69 

MS QuickC 2.0 

99 

69 

MS QuickC w/Quick Assembler 

199 

139 

MS QuickPASCAL 

99 

69 

MS Windows 

99 

69 

MS Windows/386 

195 

139 

MS 'Windows Developmertl Kit 

500 

349 

MS Word for Windows 

495 

349 

MORTICE KERN SYSTEMS 


MKS AWK 

99 

79 

MKS LEX;YACC 

249 

197 

MKS MAKE 

749 

119 

MKS Programming Platform 

665 

599 

MKS RC5 

189 

149 

MKS Software Mgmt. Team 

299 

239 

MKS SQPS 

495 

479 

MKS Toolkit 

249 

197 

MKS Trilogy 

779 

105 

MKS Vi 

149 

125 

POCKET SOFT 



.RTtink 

295 

265 

RTLink PLUS 

495 

419 


SAGE SOFTWARE/POLYTRON 


C Beautifier 

50 

42 

Dan Brick fin's Demo JE Program 

199 

159 

PFinish 

295 

259 

PFixSfePlus 

295 

259 

Plink86plus 

495 

395 

Poly AWK 

99 

85 

OS/2 Version 

199 

179 

Poly Boost 11 

80 

72 

PofyDoc 

199 

169 

FolyLrbrarian 

99 

85 

PolyLibrarian 1! 

149 

125 

PolyMake 3.0 

149 

125 

PolySbelf 

99 

85 

PolyXRef 

99 

85 

Professional PVC5 (Corporate] 

495 

419 

w/ PolyMake tor OS/2 

695 

589 

PVCS/MAKE for OS/2 

395 

335 

ZORTECH 



Zortech C Video Course 

300 

269 

Znrtech C+ + Compiler V2.0 

200 

165 

w/ source 

300 

259 

Zortech C++ Debugger V2-0 

ISO 

129 

Zortech C++ Developer's Edition 

450 

399 

Zortech C++ Tools V2.0 

150 

129 

Zortech C++ Video Course 

500 

449 


Programmer's Policies 

Phone Orders 

Hours 9 AM-7 PM EST. We accept 
MasterCard, Visa, American Express, 
Include $4.00 per item for shipping and 
handling. All domestic shipments by 
UPS ground. Rush service available. 

Mail Orders 

POs by mail or fax are welcome. 

Please include phone number. 

International Service 

Phone number required with order. 

Call or fax for additional information. 

Dealers and Corporate Accounts 

Call for Information. 

Unbeatable Prices 

Well match nationally advertised 
prices. (Subject to same terms and 
conditions.) 

Return Policy 

30-day no-hassle return policy. Most 
manufacturer's products cannot be 
returned once disk seals are broken. 


HELP/BUILD 

An Automated Documentation System 

HELP/BUILD is a complete help informarion and 
error screen generation tool. Jt allows you to develop 
any kind of pop-up help and error message system. 
You can create independent help systems which users 
call at the touch of a hot-key. You can link the help 
screens in any order to lead your users to the next 
information they should see. HELP/BUILD is menu 
driven and includes its own screen editor, optimizer, 
compiler, cross-reference generator and run module. 
Builds context sensitive help. Requires hard disk and 
256K memory, 

PACIFIC FIRMWARE MARKETING CORP. 


.RTLink/Plus 

The only MS-DOS linker with CodeView support for rnultiple/nested 
overlays. Advanced technology allows more overlays, overlay areas, 
symbols, objects, classes, and sections than any other linker. Smart caching 
of most recenily accessed overlay sections in conventional, expanded, and 
extended memory (new XMS specifications). Easy-to-use Profiler provides 
detailed performance statistics wttboul source code modification, Run-Time 
libraries (RTLs) speed development time and reduce disk space/modem-time 
requirements. Source code provided for overlay manager and Profiler's 
read-analysis utility, UBLIST provides detailed information on inter¬ 
relationships between modules—great for optimizing and designing overlay 
sc hemes . 

list: $495 Ours; $419 Pocket Soft Inc. 

VM/386 & VM/386 NetPak 

if you've ever had to wait for 
your computer to finish 
processing a task, you need 
VM/386. It lets you create lots 
of DOS sessions on your 386 
PC, each running a different 
application on a full screen. 

All background sessions will 
continue to process whether you work in an 
application on your computer or go off to lunch. 
And with the addition of NetPak, each DOS 
session can interact with network files and 
peripherals. This is the only way you can 
multitask large programs without having to exit 
and re-enter the network. 

Make VM/386 & NetPak your choices for 
bullet-proof multitasking and easy network access. 

VM/386: $199 „ 

VM/386 NetPak: $119 Together: $299 

The new 

Programmer's Paradise ® 
catalogs have arrived!! 

Call today for your 
FREE copy. 






International: 201-389-9228 
Customer Service: 201-389-9229 
Fax: 201-389-9227 


New Corporate Phone #: 

800 - 422-6507 



Call or Write for Latest Free Catalog 1 . 


1 - 800 - 445-7899 

rhMhMmwJM 

Vbioulut 

A Division of Voyager Software Corp 

1163 Shrewsbury Ave., Shrewsbury, NJ 07702 
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(continued from [>age 8) 
need not he modular, and a module 
may or may not be structured. Also, a 
module, program, or system that has 
4 ‘spaghetti code" has a structure. It is 
ca 11 ed a ra ndt )m s t ru ctu re. 

One of the purposes of using mod¬ 
ules is that the code is reusable. We use 
tliis all the time. The modules are in 
libraries. Examples are the Fortran li¬ 
brary routine SIN(x), the Cobol 
COPYLIB hie, and the C library routine 
sinCx). The proper term for module 
tree relationship is a “caller" module 
and a “called" module. This describes 
the relationship much better than the 
“father" - "son" model. Further, a mod¬ 
ule should not know anything about 
the “caller" module, other than what 
is in its argument list. Can you imagine 
the chaos that would result if we had 
to rewrite SIN( x ) or sinf x ) every time 
they had more than one caller? 

Ned Logan 

Seattle, Washington 

Pascal Participation, Pleeez 

Dear DDf 

After reading Terry’ Ritter's letter enti¬ 
tled "Standardizing the Standardizing 
Process" in your February 1990 "Let¬ 
ters" column, I have the feeling that 
many readers may not understand the 
standardization process and will lie 
given a false impression. 

Membership on X3J9, the other X3 
committees, and the IEEE committees 
is not restricted to some elitist group. 
Membership is open to all interested 
parties who are walling to participate. 
Users are especially encouraged to par¬ 
ticipate. 

Decisions are not made in a back 
room behind closed doors. Committee 
meetings are open to the public with 
visitors and observers not only wel¬ 
come but encouraged. Likewise, com¬ 
mittee documents are open to the pub¬ 
lic and people who cannot attend meet¬ 
ings can become official observers and 
receive all committee mailings. 

Consensus is the method by which 
most decisions are made both at the 
international level and at the domestic 
level for Pascal However, it is the con¬ 
sensus of those who participate. 

It was not only the consensus, hut 
the unanimous vote of both the Inter¬ 
national Working Group on Pascal and 
the American National Standards Com¬ 
mittee on Pascal that no action be taken 
on some of Mr. Ritter's comments for 
the Extended Pascal standard. The main 
reason for this was that major changes 
and development would have been re¬ 
quired and it w r as felt that this should 
lie handled separately rather than un¬ 
duly delay the standard, which was in 


its final stages of review. 

This does not mean that his com¬ 
ments have been shoved under Lhe 
table. Many of the areas brought up 
by his comments, including exception 
handling, alphanumeric labels, and mul¬ 
tiple arithmetic data types, arc being 
worked on by the committee. The in¬ 
tent is to issue information bulletins, 
technical reports, and addenda to stan¬ 
dards when work on them is completed. 
User participation is encouraged in this 
work, especially now' when it is still in 
a nearly stage of development. 

The committee is also now begin¬ 
ning to look at object-oriented exten¬ 
sions to Pascal, and has submitted a 
project proposal to its parent bodies 
for approval of this work. It is expected 
that approval will be received early this 
year. When this approval is received, 
announcements will he submitted to 
all publications (including Dr Dobbs 
and similar user-oriented publications) 
that might have an interested audience. 

People From Apple, Borland, Micro¬ 
soft, and other vendors are planning to 
participating in the object work. User's 
views, and user participation, at this early 
stage would be especially welcome. 

I encourage Mr. Ritter and other us¬ 
ers to participate in Pascal and other 
standardization efforts. No one needs 
to elect you. All you need to do is 
participate. 

For users that do not have financial 
support, there are organizations (such 
as SJGPLAN) that have funds allocated 
for this purpose. 

To find out more about participating 
in the Pascal standards activity please 
contact me by letter, phone, FAX, or 
e-mail 

Thomas N. Turba 
Chairman X3I9, Pascal 
Unisys Carp,' MS: WE3C 
P.O. Box 64942 
St. Paul, MN 55164 
612-635-2349: 612-635-2003 (Fax) 
NET: turba@rsvl,Unisys, 
cornu u netlsSOOO! tu rba 

new s More than One Way to Get 
From Pascal to G or Return of the 
Living Fugu-Eaters 

Dear DDf 

1 too enjoy Jeff Duntemann’s writings, 
though not for the same reason as does 
Dale Lucas ("Letters,’ 7 jan, 1990). f love 
a good argument. So 1 get a kick out 
of reading Jeffs ravings against C, all 
the while thinking up incontrovertible 
(I'm sure they must be) refutations. 

I do agree with him that C is ugly. It 
looks like Dagwood's dialogue after 
he hammers his thumb, %*!&( )*#$©! 
But I put up with that for the sake of 
the language's abilities. Jeff, on the other 


hand, sees no redeeming value in C, 
whatsoever, as we were so forcefully 
reminded in the January issue. 

Recall that Dale Lucas asked him 
whether there’s a way to call a third- 
party (sans source) C library’s routines 
from a Turbo Pascal program. This lit¬ 
tle spark lit the fuse to one of Jeffs best 
tirades to date, in which he accused C 
programmers of acting macho, of neglect¬ 
ing to neck with their spouses and play 
with their dogs, and (this was the killer 
blow) of EATING FL1GU! 

Oh boy, did he give it to us. Unfortu¬ 
nately, he got so carried away with his 
ranting twaddle that he neglected to 
help his Pascal co-linguist. He told Dale 
to rewrite Lhe whole library in Pascal! 

If you don’t mind taking advice from 
a fugu-eater. Dale, I think there’s a way 
to hook those C routines. But first a 
question: D<Hasn’t Turbo Pascal have 
something akin to Microsoft's "|Cl” at¬ 
tribute, which you append to a proce¬ 
dure declaration to tell the compiler to 
use C’s calling and naming conventions? 
Guess not, or the problem would be 
trivial and you wouldn’t have written. 

So you'll need to turn to a more 
powerful language — ummmh, let's say 
C —to write the hooks. Your third- 
party library will have given you a 
header file, for instance "WINDOWTl," 
declaring its functions. For example: 

int WinCrealeCint height, int width, int 

color); 

void WmGpen( int w r innumber, int 

xcord, int ycord); 

And so forth. Add to this file a new 
Pascal-callable hook function for each 
declaration, thusly: 

int pascal I IOOK_WinCreaLe(int height, 
int width, int color) I 
retumf WinCreate( height* width, color 

)); I 

void pascal HOOK_WinOpen(int win- 
numher, int xcord, int ycord.) 
|WinOpen( w in number, xcord, ycord); 

return;! 

Rename the file, say to “HOOfCC,” and 
compile it. Finally, translate the hook 
function prototypes into declarations 
for your Pascal modules; 

function HOOK_WinCreate 
(height,width,color ; integer) : integer; 

extern; 

procedure HGOK_WinOpen (winnunv 
her, xcord T ycord : integer):extern; 

(Do I have that right? I read Pascal but 
speak it poorly.) The C code above 
works on my Watcom compiler, and 
(continued on page 14) 
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INALLY. A debugging 
tool tough enough to 
handle the DOS 
Nasties. 


New Version 2.0 


Nasty over-write? No sweat! 

Soft-ICE memory range break points help you 
track down memory over-write problems 
whether you are doing the over-writing or 
another program is over-writing you. 

Hung program? No problem! 

When the system hangs, you now have hope 
Widi Soft-ICE you can break out of hung 
programs no matter how bad the system has 
been trashed. And with Soft-lCE’s hack trace 
ranges you can re-play the instructions that led 
up to the crash. 

Program too large? Not with Soft-ICE! 



How Soft-ICE Works 

Soft-ICE uses the power of die 80386 to sur¬ 
round your program in a virtual machine. 
This gives you complete control of the 
DOS environment, while Soft-ICE runs 
safely in protected mode. Soft-ICE uses the 
80386 to provide real-time break points on 
memory locations, memory ranges, execution, 
I/O ports, hardware &r software interrupts. 
With Soft-ICE you get all the speed and power of 
a hard ware-assisted debugger at a software price. 

Don’t want to switch debuggers? 

You don’t have to! 

Soft-ICE can run stand-alone or it can add its 
powerful break points to the debugger you already 
use. Use your favorite debugger until you require 
Soft-ICE, Simply pop up the Soft-ICE window to set 
powerful real-time break points. When a break point 
is reached, your debugger will be activated automatically. 


Soft-ICE runs entirely in extended memory. This means 
you can debug even the largest DOS programs. And 
since your program runs at the same address whether 
Soft-ICE is loaded or not you can find those subde 
bug£ that change when the starting address of your 
code changes. 

System debugging? Soft-ICE is a natural! 

Soft-ICE is ideal for full source level debugging of TSRs, 
interrupt service routines, self booting programs, DOS 
loadable device drivers, real-time kernels, non-DOS O/Ss 
and ROMs, Soft-ICE can even debug within DOS &r BIOS. 


MagicCV with Soft-ICE 

Using Soft-ICE with CodeView gives you the features 
necessary for professional level systems debugging, 
MagicCV and Soft-ICE can work in concert with Code¬ 
View to provide the most powerful debugging platform 
you will find anywhere. 

These may be the only two products IVe seen in 
the last two or three years that exceeded my wildest 
expectations for power, compatibility and ease-of-use/ 5 

—Paul Mace 
Paul Mace Software 


Mew Product / New Idea 


Soft-ICE 

$386 

■ Find overwrites and uninitialized 

MagicCV 

$199 

pointers automatically 

MagicCV for Windows 

$199 

■ All the protection of a protected 

Buy Soft-ICE & MagicCVfW) 

O/S under DOS 

— Save $86. 

Buy MagicCV and MagicCVW 

—Save $100, 

Bounds Checker * $249* 

Nu-Mega 

Buy All 3 

—Save $186, 

i t a a 

30 day money-back guarantee 
Visa, MasterCard and 

■ 

TECHNOLOGIES 

AmEx accepted 

m r r * 

A H I ■ □ a 

T'Cw 

CALL TODAY (603) 888-2386 
or FAX (603) 888-2465 


RUN CODEVIEW 
IN 8K 

MagicCV 



CodeView is a great integrated debugger, but 
it uses over 200K of conventional memory. 
MagicCV uses advanced features of the 
80386 to load CodeView and symbols in 
extended memory This allows MagicCV to 
run CodeView in less than 8K of conven- 
rional memory on your 80386 PC 


NEW—Version 2.0 includes EM5 4 0 driver 
Attention Windows Developers! 

Version available for CVW 


P.O. BOX 7607 ■ NASHUA, NH ■ 03060-7607 


CIRCLE NO. 174 ON READER SERVICE CARD 
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(continued from page 12) 
ought to work on QuickC as well. Of 
course, TVe begged the more difficult 
questions like memory models and trans¬ 
lating C strings and structures into Pas¬ 
cal. But this might be enough to get 
you started. 

A couple of closing questions. 
Dale . , , wouldn’t it be easier just to 
code your app in a real-man’s language 
like C? And Jeff, . . what the hell IS 
fugu T anyhow? 

Bob Twilling 
Bozeman, Montana 

Dear DDf 

In your January issue, you printed a 
letter from Dale Lucas asking for Kelp 
interfacing Turbo Pascal to C Jeff Dun- 
temanris response spent more effort 
bashing C than helping Mr. Lucas. Pm 
not particularly fond of C either but I 
think 1 have a very simple solution. 

I know r nothing about Turbo Pascal 
buL if it uses (or can be made to use) 
the same calling convention as Micro¬ 
soft Pascal we’re in luck. Simply use 
Microsoft QuickC to create one-line 
helper functions that translate the call¬ 
ing conventions. These helper (unc¬ 
tions would be declared as "pascal” 
functions, and thus be callable directly 
by Pascal. The only statement in the 
function would be a call to the library 
function using the C calling conven¬ 
tion, For example: 

int cdecl foobarC(intjnt); /* This is in 
the library V 

int pascal foobarPascaUint argl, int arg2) 

1 

return ( foobarOargl, arg2) ); 

) 

This assumes the C-based library has a 
function called fooharC( K which has 


two integer arguments and an integer 
return value. The function jboharPas- 
cal( ) passes the arguments in the re¬ 
turn value out. 

Tim Paterson 

Renton. Washington 

Dear DDf 

This letter is in response to Jeff Dun- 
temann’s answer to Dale Lucas's letter 
in the January 1990 issue of Dr . Dobb s 
Journal 

1 disagree with Jeffs answer, A Pas¬ 
cal routine can call a C routine by using 
an impedance matching routine writ¬ 
ten in assembly. The routine takes the 
Pascal arguments, pushes them on the 
stack, calls the C routine, cleans up the 
arguments pushed, and then cleans up 
the stack for the Pascal caller. A macro 
can be built, which has the Pascal entry 
point, the matching C entry point, and 
the size of the arguments in bytes. The 
macro CHook in Listing One (below) 
implements this. 

The Pascal programmer simply calls 
the Pascal entry point. The impedance 
matcher handles the language differ¬ 
ences and returns. Simple, easy, and 
direct. Much better than recoding a 
debugged, commercial library. 

By placing the code in a macro, Lhe 
user can just build a table of macro 
calls which reflect all entries to the C 
library. Each macro expands and builds 
the impedance matching code for each 
library entry point. 

Some notes involving the use of the 
macro: 

* The argument size is given in bytes, 
not number of arguments. You must 
determine the number of bytes by add¬ 
ing the number of bytes in each argu¬ 
ment that is passed. 

• This impedance matcher will work 


for Pascal procedures. For functions, 
you will have to make sure that your 
flavor of Pascal uses AX for 16-bit re¬ 
turn values and DX:AX for 32-bit return 
values. If you need to map the function 
return values, just add this to the macro. 

• I coded this macro for large model 
programs. Small model programs must 
adjust the value added to SI from 6 to 4. 

• If SS matches DS at all times, the 
push/load/pop of DS can be removed. 

• The argument Lransfer can be sped 
up by using a MOVSW and dividing 
the count stored in CX by 2. This should 
always work because C requires the 
minimum argument by an int (2 bytes 
under MSG). 

• If the size of the arguments is 0, the 
argument transfer code can lie elimi¬ 
nated using conditional assembly. 

• Normally, the name of a C routine 
starts with an underscore. This could 
be included in the macro instead of 
requiring an underscore for every CHook 
invocation. 

• The impedance match does take time. 
If you have a very time-critical call, you 
may have to recode the routine in Pas¬ 
cal or directly in assembly. However, 
the macro can gel you up and running 
quickly. 

This code has not been tested with 
Turbo Pascal It has only been tested 
using a Microsoft C program (Listing 
One) that calls the Pascal entry using 
the pascal keyword. If the macro doesn't 
work with Turbo Pascal, it should only 
take a small amount of tweaking to 
make it work. The key is to draw a 
picture of your stack frame and test it 
in Debug, Following the argument flow. 

Jim Shimandle, Primary Syncretics 

Santa Clara, Calif, 

PDJ 


Listing One 





t 



CALL 

CEntry ; 

Call the C routine 

; c2pas.fl.sm 



ADD 

5P, ArgSiso } 

Remove arguments from ataeJt 

j C/PASCAL Impede nee mat china module 




l 



POP 

DS i 

Restore registers 

.model 

large 


POP 

DI 


code segment para public 

'coda' 

POP 

SI 





POP 

CX 


/ 



PDF 

HP 1 

Restore frame 

CHook MACRO 

Faisal Entry. 

CEntry. ArgSire 

RET 

ArgSire : 

Exit 

EXTRW 

CEntryiFAR 




PUBLIC 

FasoUEntry 


PaecalEntry 

EtfDP 


PascatEotty 

PROC 

/ Make stack frame 

ENDM 



PUSH 

BP 

J--- 



MOV 

BP, SP 


? Invoke macro 

for teat routine 


PUSH 

CX 

} Save registers 



invoke macro fori 

PUSH 

SI 

CHook p_aira3. 

j;_5U!n3, 6 i 

PUSH 

DI 




p_sumJ is PASCAL call 

PUSH 

DS 



i 

c__aum3 is C library routine 

the number Of argument bytes 

MOV 

cx H ss 

; Set DS to point to stack 




MOV 

SUB 

DS, CX 

SP r ArgSize 

; Save space for argumenta 

code ends 



MOV 

CX, ArgSize 

; Set count for arg transfer 

end 



MOV 

51, BP 

: Get frame pointer 




ADD 

St, 6 

; Point to start of PASCAL arguments 

; end of cipas-asm 


NOV 

DI, SP 

; Point to start of C arguments 

i 



CLD 

REP MOVSB 

; Move is up 
; Move the arguments 



End listing 
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Instant Workstation. 


Jost Add Open Desktop. 


T ake a look at the vast majority of graphical workstations 
developed over the past decade and you’ll see something 
they all have in common: 

An integrated UNIX® System environment. 

Now take a look at the vast majority of businesses that have put 
computing power directly onto their office desktops over the 
past decade, and you'll see something they all have in common: 

Industry-standard personal computers. 

I t doesn't take a computer to forecast the platform that’s going 
to put graphical workstations on the vast majority of business 
and engineering desktops in the next decade: 

An integrated UNIX System environment for industry-standard 
personal computers. 

And that’s what Open Desktop'" is all about. 

O pen Desktop is the complete graphical operating system 
that’s built on the most popular UNIX System platform of 
all time—SCO”. And it lets you create your own networked, 
icon-driven workstation environment using the industry- 
standard 386 or 486 computers and peripherals of your choice. 


I n a single, easy-to-use, fully supported—and completely 
integrated—package, Open Desktop delivers: 

• the full 32-bit, multitasking computing power of SCO UNIX 
System V/386 

• compliance with POSIX” and X/Open® standards 

• an OS#Motif“-based, Presentation Manager-compatible, 
graphical user interface 

• distributed SQL database management services 

■ compatibility with existing DOS, XENIX®, and UNIX System 
applications and data files 

■ NFS™, TCP/IP, and LAN Manager networking facilities 

And all at an unbelievably affordable price. 

D iscover the complete graphical operating system that 
leading companies worldwide are choosing as their devel¬ 
opment platform for the ’90s—and using to turn their 386 and 
486 PCs into instant workstations today. 

Open Desktop from SCO. 



OPEN 

DESKTOP. 


SCO 


The Complete Graphical Qpewthig System THE SANTA CRUZ OPERATION 

For more information h call SCO today and ask for ext. 8401 CIRCLE NO, 42 ON READER SERVICE CARD 
(800) SC0-UN1X (726-8649) nr (108)425-7222 FAX: (408)458-4227 E-MAIL:. JuuneUscoMidbinlb@seo.COM 


SCft ih*st:ti kign, iWn [li-sMiifi, ittilUir llfrii IX'bk.1 Iifli hflii 1 rt [rjiknariih iifTne Sail la Cj hi Opcralwm, Iju\ UNIX is i registered Irtulemitrlt uT ATRT in liif USAhimI qtlKr&lUfllrlea. FttSJXis a tfwkiUiirliufinic I u 'in we ilN3«trictl «ul tilwtriMicji (Snfiraewii tULUlD. V-Upeii is a 
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Bidirectional Associative 
Memory Systems in 

C++ 

Recent innovation makes associative memory practical for 

real-world problems 


Adam Blum 


ontent-addressability was always a goal of early 
i 1 neural network pioneers. It is a quest that has been 
pursued by computer scientists in general for dec- 
\ * ades. However, the goal has proved highly elusive, 

Xw/ Search time has always depended on the amount 
of data stored, although much research has gone into reduc¬ 
ing the slope of this curve. Real-time pattern recognition (as 
applied to any number of fields, be it speech recognition, 
radar signature identification, or pan classification) is still 
far from reality. One particular neural-network construct, 
bidirectional associative memory (or BAM), has promised 
some solution to this problem. 

I ll first describe the BAM concept, then show you how a 
relatively recent construct, the Bam System, can make it 
immediately feasible for real problems. Finally, I'll present 
an actual implementation of the Bam System written in C++. 

As developed by Bart Kosko, BAMs are a neural-netw ork- 
based attempt at content-addressable memories. They are 
based on a two-layer feedback neural network. They at¬ 
tempt to encode m pattern pairs (A |t Bj) where A ; e 1-1,+ H" 
and B i e 1-1,+11^ in an n X p matrix M. BAMs are globally 
stable and provide instant recall of either of the two-pattern 
pair elements. However, BAMs face some limitations. For 
large pattern lengths, n, storage requirements increase 0(n 2 ). 
More importantly, storage capacity is only, on an average, 
m < min(n,pX Thus, for moderate pattern lengths, capacity 
of the matrix M becomes a problem. Recent research prom¬ 
ises help for this problem. However, some initial description 
of BAMs should be made. 


Adam is a programmer analyst at Kelron Inc * of Arlington, 
Virginia, and is the principal deieloper of several commer¬ 
cial software packages. His interests include compiler de¬ 
sign , C++, and (of course) applications of neural nets. He 
can be contacted at 1 700 N. Moore St., Ste. 1710 , Arlington , 
VA 22209 , or on CompuServe at 72650 , 1 773. 


Encoding 

BAM encoding is accomplished by simply summing the 
correlation matrices of each of the pattern pairs. That is, the 
matrix that encodes the first m pattern pairs, M, is simply: 

m 

M - SA fc T Bj 
t-1 

Thus, to encode a pattern pair, simply produce Its correla¬ 
tion matrix, ATBj, and add the values to the current matrix 
M. For discrete implementations, it so happens that the 
matrix arithmetic works out better if Os and Is are encoded 
as -Is and +ls. So the first step in the process will be to 
convert any 10,1} string to (-1,+ 1). Example 1 shows this 
process. 

Note that we can erase association (A I ,B I .) from M by 
adding -X i TY | to M. But if we are using a 1-1,+1) representa¬ 
tion, this is the same as adding (A^B^C) or (A^R) to M 
(where C represents the pattern’s complement). This fact 
will l>eeome important in our implementation of the BAM 
system. 

Decoding 

After we have “trained’* our BAM with the m partem pairs 
(A ( ,B.), we want the BAM to recall pattern every time A t 
is presented to the matrix (and, conversely, recall A ; every 
time B j is presented to the matrix). It turns out that BAMs 
also have the property that B, will be recalled every time 
something close to A. is presented* Example 2 outlines the 
steps involved in the decoding process* 

But it wont go on forever. As shown in Example 2, 
eventually the fields will “resonate” to steady patterns. This 
property of BAMs is called “global stability** 5 Lyapunov 
energy functions allow us to prove that BAMs are globally 
stable. 
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Energy Functions and Stability 

Lyapunov showed that any function expressed in terms of 
the system parameters that is zero at the origin and has 
non increasing changes is globally stable. 

An energy function for the BAM can be E(A,B)= -AWB 1 . 
This function is obviously zero at the origin (that is, zero 
when A and B are zero). We just need to show that it has 
nonincreasing changes. Well, AE a (A,B>- -AWB T and by the 
definition of our function f each A t in A will be positive only 
if WjB is positive. If A 3 is negative, W.B must also be nega¬ 
tive. Thus the change in energy will always be negative or 
zero. The system is thus globally stable. 

Adaptive BAM 

As we have just described it, the connection matrix M is 
simply the sum of the correlation matrices of the patterns 
presented to it. We can use more sophisticated equations 
to allow faster convergence or more accurate recall. As long 
as such equations can also be shown to converge, we 
should have no problem with this. 

The simplest of these learning laws is called Hebb's law: 
nx, - -m.. + f s (x.) * fj(y f ), where nx, is the connection weight 
tetween the neuron x { and neuron y., and f and f. are the 
threshold activation functions for x and y, respectively. 

Other laws that could be used include competitive learn¬ 
ing and differential Hebb; there is much research on which 
of these is most effective. In our implementation, we will 
be presenting a simple nonadaptive BAM. However, it is 
easily extensible to the learning function of choice. 

Problems 

BAM faces two problems, the first of which is that the 


amount of storage taken up varies 0(n 2 ), where n is die 
pattern length (actually, it will vary O(np) where n is pattern 
length of A and p Ls pattern length of BX 

The second problem — capacity — is more critical Reli¬ 
able retrieval of associations begins to degrade when the 
number of patterns stored, m, is greater than the minimum 
of the two-pattern dimensions. In other words, to be reliable 
the matrix capacity is m < min(n,pX 

For large pattern lengths, this is not so much of a problem, 
but many applications have inherently moderate pattern 
lengths. We intuitively find it almost obvious that if a BAM 
can store only up to the minimum of its pattern lengths, it 
will be virtually useless for real-world applications. 

BAM Systems 

In 1989, Patrick Simpson of General Dynamics published a 
paper introducing the concept of a "BAM System/' This is a 
rather uninformative name for a system that allows for 
multiple matrices when one matrix's capacity is saturated. 
Perhaps a tetter name would be “Multi-Matrix BAM” or, 
because each matrix is just a representation of the connec¬ 
tivity between the two patterns, "Multi-Connective RAM/ 1 
Anyway, it is an inventive way to overcome die severe 
problem of matrix capacity. 

The Bam System operates as follows: Pattern pairs are 
encoded one by one in a single BAM matrix, M r After each 
pattern pair is encoded, the matrix must be tested to ensure 
that each pattern pair stored can be recalled. If a pattern 
pair cannot be recalled, the current pair is removed from the 
matrix. We then attempt to store the pair in another connec¬ 
tion matrix. We continue to try to store it in other matrices, 
Mj, until it is stored such that all pattern pairs in that matrix 
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BAM SYSTEMS 


can be recalled successfully. The pattern association is Chen 
permanently stored in this matrix. 

Decoding, that is presenting one-half of a pattern and 
recalling Che other half of the pair, is a bit more complicated. 
Because we now have several matrices storing pattern asso¬ 
ciations, we don't know which one is the correct one to look 
in to recall the pattern pair. To choose which pattern pair 
to recall from each matrix, we use the following criterion. 

We determine all the relumed pattern pairs (X^Y) that 


If we are trying to encode 


A 1 =(101010} B t = (1100) 


A 2 = (111000) B 2 = (1010) 


we first convert to {-1,+1}. 


X 1= (1 -11-1 1 -1) 

V(i i-i-i) 

X^(1 1 t -1 -1 -1} 

(1-1 1-1) 

Wl 1-1-1 




1 1-1-1 


-1111 


1 1-1-1 


-1-111 


x 

"h 

J< 

II 


1-1 1-1 


1-1 1-1 


-11-11 


-1 1-1 1 


-1 1-1 1 


M = 2 0 0 -2 


0-2 2 0 


2 0 0-2 


’2 2 0 2 


0 2-20 


-2 0 0 2 



Example 1: The encoding process 


Each neuron in field Fb (Fa and Fb will be used to refer to the 
two pattern fields A and B) receives a gated input of all the 
neurons in Fa with a nonlinear threshold function applied. In our 
bipolar discrete example a typical function might be: 

f{x f y) if x > 0 
y if x = 0 
0 if x < 0 

We now have a pattern B r However, we aren’t done yet. The 
output from pattern B is then fed back through the transpose of 
matrix M to produce pattern A r That is, each neuron A, in A 
receives gated input from each neuron in B and applies the 
same threshold function to it. 

A, is then sent back through the matrix again to produce B 2 , and 
on this goes. 

A -> F(AM) ~> B 1 
A t <- F(B t M T ) B t 
A t --> F{A t M) -> B 2 


Ai->F(A ( ) --> B i 
A ; -> F(B { M) -> B s 


Example 2: The decoding process 
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(continued from page 18) 

have the same energy as the pair (A,Y.) (where A is the 
presented pattern). Of these patterns we choose that pattern 
pair whose energy is closest to the matrix's orthogonal BAM 
energy. (Orthogonal BAM energy is the energy a matrix 
would have if all its stored patterns were orthogonal which 
turns out to he equal to the negative of the product of the 
pattern lengths, E* = -np. Energy of a pattern pair can be 
calculated the same way as in our previous discussions, 
E =-XMY T , where X and Y are the two patterns.) 

There are some problems with the Bam System. In order 
to keep checking that the patterns were stored reliably in 
each matrix (without corrupting the other patterns already 
in the matrix) the patterns need to be stored separately. 
Also, the need to compute the “best" recall from each of the 
BAM matrices could be computationally prohibitive. Parallel 
hardware (which, presumably, a BAM would be running 
on anyway) could possibly ease this burden. 

The Implementation 

C++ provides an excellent tool for implementing neural nets 
in general and BAMs in particular. Most of the constructs in 
this discussion of BAMs were vectors and matrices. This is 
a classic application of object-oriented programming. Classes 
tor vectors and matrices should go a long way toward 
making the implementation easier. Listing One (page 84) is 
BAM.HPP, the BAM header file that contains the class defini¬ 
tions. Listing Two (page 84) is BAM.CPP, the BAM program 
file that contains the BAM implementation. 

The vector class is implemented in classic fashion (almost 
identical to Stroustrup’s), Methods are provided for assign¬ 
ment, multiplication by scalar constant, and dot product. 
Tlijs is all that is really necessary, but a few more methods 


are provided for completeness. Streams input and output 
are provided to read the patterns in and display patterns to 
the user. The streams functions do the necessary (0,1) to 
(-1, +1) conversion discussed earlier. 

The matrix class is implemented as an array of pointers 
(int **), with indicators of the number of rows and columns. 
It could conceivably have been implemented as an array of 
vector objects. I chose representation for efficiency. There 
are several constructors provided. The first simply initializes 
the matrix from specified dimensions. These dimensions 
default to the particular application's two pattern lengths 
(specified by the ROWS and COLS constants). Other con¬ 
structors are provided to form a matrix from a pair of vectors 
by multiplying one vector by the transpose of another 
(M^AB 1 ). Standard matrix arithmetic functions are included. 
Methods are also provided to form a vector from a row or 
column “slice" of the matrix. Streams output is provided for 
debugging diagnostics. 

Another fundamental construct is the pattern pair. This is, 
after all, what the BAM lets us do — retrieve pattern associa¬ 
tions. Pattern pairs are represented by the “veepair" (vector 
pair) class. An "encode' 1 operation will encode a veepair. A 
“recall" operation will return a veepair, when supplied with 
a pattern (or “vec"). 

Once we have these vector, matrix, and vector pair classes, 
implementing the BAM is fairly simple. The BAM is essen¬ 
tially just a matrix. We use the C++ inheritance mechanism 
to inherit the matrix and all its functions. We made the 
matrix's data structures "protected" instead of "private" so 
the derived BAM matrix class could use the matrix’s data 
structures. We now just add a veepair pointer for the pattern 
pair list and the BAM matrix functions. 

(continued on page 24) 
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(continued from page 20) 

These consist mainly of the “encode” and “recall” func¬ 
tions central to the BAM, Encode simply takes the “veepair" 
corresponding to the association and adds it (with matrix 
add) to the current BAM. Recall “feeds” the presented pat¬ 
tern through the matrix (with dot products and by applying 
a threshold function as discussed earlier) to return another 
vector. We keep feeding the vectors back and forth until 
they stabilize to a consistent pattern association. There are 
also some auxiliary functions for checking the integrity of 
the BAM, returning its energy for a particular association (as 
discussed earlier), and for “uncoding” or removing an asso¬ 
ciation from the BAM. 

The Bam System class consists of an array of pointers to 

BAMs are a neural-network-based 
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BAM matrices. Each time a BAM matrix is saturated, a new 
matrix is created, and the new pattern association is stored 
in it. The major functions are again “encode” and “recall.” 
Encode attempts to store the pattern association in each of 
the BAM matrices until it succeeds. It will create a new BAM 
matrix if it runs out of matrices. Recall performs a BAM 
matrix recall operation on each of the BAM matrices. The 
returned association that is closest to the presented pattern 
and has the lowest energy relative to its matrix (as discussed 
earlier) is then returned as the “correct” pattern association. 
Another function is provided to "train” the Bam System from 
a specified file of pattern associations. The patterns happen to 
be represented as 01 strings, but this could be easily changed 
to whatever representation (for example, floating-point num- 
Ix-Ts, character strings) suits the specific application. 

Thanks to the wonders of C++, the code is very readable. 
Most of the algorithms can be implemented in the same 
vocabulary as the theory. Take a look at it to examine the 
mechanics in detail, lr should even be clearer (and certainly 
more specific) than the discussion above. 

The Test Program 

T ve included a test program (TESTBAM.CFP, Listing Three, 
page 88) that demonstrates an actual running Bam System, 
A Bam System is created and told to "train” itself from the 
file TEST.FIL (see Listing Four, page 88). This file contains 
a set of simple "pattern pairs,” represented as (0,1) strings 
delimited by commas — one pattern pair to a line. Once the 
Bam System is trained, you can enter any pattern you want 
(using the 01 format mentioned) and the correct pattern 
association will be recalled. If the pattern is slightly wrong, 
the correct pattern association will still most likely be re¬ 
called. The make file, TESTBAM.MK (Listing Five, page 88), 
shows how to construct this test program. 

What Can you Do With It? 

Uses of the Bam System are constrained only by your 
imagination. Obvious uses include optical character recog¬ 
nition (the pixel patterns scanned in would be associated 
with the actual letters), voice recognition (the acoustic pat¬ 
tern would be associated with the actual word), or a super 
spell checker (word patterns associated with phoneme- 
string patterns). You can use a Bam System in [ust about any 
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products I've had the luck to use. I can 
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Safe Linkage make 
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advanced compiler 
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The Best Lint Just Got Better 

PC-lint is a C source code analysis tool* It will check code 
more thoroughly than a C compiler and, because it looks 
across multiple modules, it enjoys a perspective that your 
compiler doesn’t have. 

Control your development time and cost* Find C source 
code errors before they find you* 

Over 270 error messages* More than 90 options for com¬ 
plete customization. Suppress error messages, locally or 
globally, by symbol name, hy message number, by filename, 
etc. Easy to Use - If you know C you already know how to 
use PC-lint. Check for portability problems* Alter size of 
scalars. Adjust format of error messages. Automatically 
generate ANSI prototypes for your K&R functions. 

New Features in Version 4.0 

* Lint Object Modules - incremental linting - big linting. 

* Weak Defmial Checking - macros, structs, enums, 
lypedefs and declarations not used globally and locally. 
Header files not used* Externals that can he made static* 
Declarations that can be moved from headers* etc. 

* Library Headers - avoid redundant prototype processing. 

* Over 70 new messages and 30 new options, including 
identifier truncation clashes. 

* New "Elective Notes" message category. 

■ Unix lint compatibility 

Mainframe and Mini Programmers 

Get HexeLint 4,0 (formerly Generic Lint) in shrouded 
source form for VAX/VMS, Unix, IBM V M/M VS, QNX 
OS-9, DG AOS/VS, etc. Requires only K&R C to compile 
but supports ANSI* Pricing starts at $7%, Call for details* 



3207 Hogarth Lane Collegcville PA 1942b 
(215) 504-4261 - CALL TODAY 
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PC-lint is only $139 - Specify MS-DOS or OS/2 

30 Day Money-back Guarantee 

Quantity and educational discounts available* PA add 6% sales tax. 
Outside USA add $20. 
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BAM SYSTEMS 


(continued from page 24) 

application where you have a large number of “associa¬ 
tions" that you would like to be able to recall close to 
instantaneously, and where some tolerance for error would 
he useful* 

A successful application of BAM for radar signature classi¬ 
fication was presented at the January 1990 International 
Joint Conference on Neural Networks (IJCNN). However, it 
was not a Bam System, and the implementors had to resort 
to various other tricks to get around capacity limitations. 
Several other associative memory applications appeared; 
hut none of them were associative memory systems. They 
all would probably run into the capacity roadblock eventu¬ 
ally for large data sets. Associative memories and BAMs 
have begun to appear implemented in VLSI, but again the 
capacity will prove to he a limitation for practical work. Bam 
Systems should have a radical effect on the usefulness of 
these chips. 

Conclusion 

Bidirectional associative memories appear to provide the 
content-addressable memory long sought after by computer 
scientists. They provide instant recall of pattern association, 
tolerance for error and fuzziness in the provided pattern, 
and global stability* However, by themselves they face some 
limitations. Simple BAM matrices cannot encode more pat¬ 
tern pairs than the smaller of their two dimensions* Some 
applications have inherently smaller pattern length, and, for 
them, matrix capacity- will prove to he a severe limitation. 
However, the Bam System appears to overcome this prob¬ 
lem, making associative memory a reality. 

Notes 

Gross berg, S. The Adaptive Brain, I & 11, Boston, Mass.: 
Reidd Press, 1982. 

Kohonen, T. Self Organ iza t ion and Associative Memory, 
Berlin, W. Germany: Springer-Verlag, 1977* 

Kosko, B, “Bidirectional Associative Memories," IEEE Trans. 
Systems, Man, Cybernetics, VoL 5MC-L8, 49-60, Ian ,/Feb. 
1988. 

Rumelhart, Of... McClelland, J*L., eds„ Parallel Distrib¬ 
uted Processing. I & II. Cambridge, Mass,: MIT Press, 1986. 

Simpson, P.K. "Bidirectional Associative Memory Sys¬ 
tems/' Heuristics, 1989 

Simpson, P.K** “Associative Memory Systems," Proceed¬ 
ings of the international Joint Conference on Neu ral Net¬ 
works, January 1990. 

Availability 

All source code is available on a single disk and online. To 
order the disk, send $14.95 (Calif, residents add sales tax) 
to Dr. Dohh's Journal, 501 Galveston Dr., Redwood City* 
CA 94063. or call 800-356-2002 (from inside Calif.) or 800-533- 
4372 ( from outside Calif. )* Please specify the issue number 
and format (MS-DOS, Macintosh, Kaypro). Source code is 
also available online through the DD} Forum on Compu¬ 
Serve (type GO DDJ). The DDJ Listing Service (603-882- 
1599) supports 300/1200/2400 baud, 8-data bits, no parity, 
1-stop bit. Press SPACEBAR when ihe system answers, type; 
listings (lowercase) at the log-in prompt. 

DDJ 

(Listings begin on page 84,) 

Vote for your favorite feature/article. 

Circle Reader Service No. 1. 
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ONLY $499.95 


Learn C+ + Now! 
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easiest OOP language to 
/earn. That's why it's called 
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expensive even without the 
travel and hotel costs. Of 
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cost you even more in the 
/ong run. Now there is an 
alternative/ 
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possible price. 

The C++ video tutorial 
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C+ + training tool for work 
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independent) and is 
available with or without 
the award winning Zortech 
C+ + Compiler for 
MS-DOS and OS/2. 

Start writing C+ + code 
within a week. 

As a C programmer, you 
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watching the video and 
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suggested exercises to 
learn C++ in only six 
weeks! 

The Leader in video 
tutorials. 
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C, you can join fens of 
thousands of programmers 
world-wide who have 
learnt C with the Zortech 
Complete C Video Course, 
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Gary Ray, PC WEEK 


Save your company 
thousands of $$$'s. 

One programmer can train 
for only $499.95, but you 
can train ten programmers 
for just: 

C++ Course $499.95 
9 Extra Workbooks S269.55 
TotaMO students $769.50 

Yes! Only $76.95 each! 
(With all the FREE refresher 
courses you need!) 

Now, Zortech with its new 
C+ + Video Tutorial has 
refined the art of video 
tuition and presentation 
even further for the 1 990' s. 

IN USA CALL: 


Please rush me these items. 

Qiy Description Price 

_ C++ Video Moriaf $499,95 

_ Extra C+ + Workbooks $. 2 9.95 

_ Zortech C+ + Compeer $199.95 

_ Developer's Edition $450.00 

Please odd $7 50 Shipping in USA 
International shipping charged at cost 


Only $499.95 complete 

• Six Videos with 32 lessons 
• 256 page workbook 
• Tutorial disk 

• Compiler & hardware 
independent 

•NTSC or PAL format 

• Tax deductible 


Don't delay, order now! 

Just mail the coupon or ca/f 
the order hotline for same 
day shipment. 

USA: Zortech Inc., 

1165 Massachusetts Avenue, 
ARLINGTON, MA02174 
Voice: 61 7-646-6703 
Fax: 617-643-7969 

EUROPE: Zortech Lid., 

106-108 Powis Street, LONDON 
SE18 6LU 

Voice: 44-1 -316-7777 
Fax: 44-1-316-4138 


Company 
Address _ 


State _ Zip _ 

Phone__ 

MQVISA or CHECK_Expiry 

Card No,__ 


AUSTRALIA: Noble Systems 
Voice: 02-564-1200 
Fax: 02-564-1465 


1 - 800 - 848-8408 


O RDERFORM 


Name 


CIRCLE NO. 258 ON READER SERVICE CARD 


















A Neural Network 
Instantiation Environment 

Dynamically creating neural nets lets you concentrate on 
network response characteristics 


Andrew J. Czuchry, Jr. 


T he automatic generation of tai¬ 
lored neural network architec¬ 
tures greatly simplifies the tedi¬ 
ous task of putting together neu¬ 
ral networks. Typically, an ar¬ 
chitecture is assembled by manually 
writing and modifying a collection of 
software routines; automation speeds 
this standard process of assembling net¬ 
works. However, task simplification 
through the automatic generation of 
network architectures often implies lim¬ 
ited flexibility when applied to real- 
world problems, in order to develop 
useful network architectures in an effi¬ 
cient manner, the provision of both 
task simplification and complete flexi¬ 
bility is an inherent design principle in 
the research environment that instanti- 


Andy earned the A II degree in com¬ 
puter science from Dartmouth College 
and the MS. degree in information 
and computer science from the Geor¬ 
gia Institute of Technology. He is pres¬ 
ently pursuing a Ph.D degree in infor¬ 
mation and computer science at the 
Georgia Institute of Technology. His re¬ 
search is supported by the Artificial 
Intelligence Branch of the Georgia Tech 
Research Institute. Andy has published 
several articles on topics concerning 
( 'intelligent ” computer systems. He can 
be reached at the Georgia Institute of 
Technology, A . /. Branch f Georgia Tech 
Research Institute, 243 Baker Bldg., 
Atlanta , GA 30332 , 



ales (dynamically creates J neural net¬ 
works. Instantiation is the flexible pro¬ 
cess of automatically piecing together 
architectures based upon modifiable 
structures that represent the parame¬ 
ters of the assembled neural networks. 

The incorporation of network instan¬ 
tiation into an entire research environ¬ 
ment for neural networks results in a 
system Lhat pre>vieles 1 K)th task simplifi¬ 
cation and complete flexibility. 

Task simplification can be achieved 
by using a variety of knowledge-repre¬ 


sentation techniques. Complete flexi¬ 
bility can be maintained by strictly ap¬ 
plying standard software-modulariza¬ 
tion techniques. The merging of these 
two types of techniques — knowledge 
representation and software modulariza¬ 
tion — provides the foundation for the 
instantiation process that forms the ba¬ 
sis of a powerful neural network re¬ 
search environment. 

In this article, I discuss the need for 
such an environment and describe a 
working version. In so doing, 1 de¬ 
scribe the knowledge-representation 
techniques used, and the essential inte¬ 
gration of knowledge representation 
and software modularization, (The 
model was developed on a Symbolics 
Lisp machine, chosen for its flexibility 
and power in symbolic manipulation 
and for its exploratory prog ramming 
environment. The implementation lan¬ 
guage is Lisp.) 1 also present experi¬ 
mental results of using the environ¬ 
ment for a test-case network, and fi¬ 
nally, I discuss future efforts and the 
evolution of the environment 

System Overview 

The task of generating usable neural 
network architectures for real-world 
problems is quite challenging. Basic 
standard networks are merely skele¬ 
tons for useful systems. For example, 
Fukushima’s neocognitron 1 is really a 
class of neural networks. Most often 
only specific instances (class elements) 
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The Power of 
LISP 


Speed and 
Simplicity of 


You are comfortable with C, you like 
its simplicity and run-time performance. 
We have good news for you: you do not 
have to give up all this in order to take 
advantage of Lisp's tremendous power. 
And this is done without changing C T s 
syntax or adding a preprocessor. For 
example: 

Lisp x-HIL, y=NIL; 


Set <y, HakeExp ("(C&C model)"))? 
Set (x, GetProp (CartyK Cadr(y)))i 


B-Troes and document retrieval 
functions make LispC a good candidate 
for object oriented data base design. 
Functions for defining and manipulating 
objects (inheritance supported) are 
included as sample code. 
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Processing. Source code available loo. 

An incremental garbage collector 
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applications. 
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NEURAL NETWOR 


(continuedfrom page 28} 
are described in the literature — the 
skeleton for a neocognitron is a multi¬ 
layer, hierarchical neural network for 
visual pattern recognition. It consists 
of a series of layers of subnetworks 
that are organized according to spe¬ 
cific guidelines. The system's exact pa¬ 
rameters (for example, the number of 
layers, the number of subnetworks per 
layer, and the size of each subnetwork) 
are often tailored to the problem being 
addressed. This tailoring is the meat on 
the skeleton and is determined by the 
application's processing requirements. 

Such tailoring is evident in the differ¬ 
ences between the architectures of the 
neocognitron described by Fukushtma 
and Miyake 2 and by Fukushima. 10 
Fukushtma and Miyake 2 describe a 
seven-layer system for type-written or 
stylized (that is, written to meet certain 
specifications of consistency) numeral 
recognition. Each layer of the network 
has 24 subnetworks, except for the in¬ 
put layer, which is a single subnetwork 
layer In contrast, the architecture of 
the neocognitron for hand-written nu¬ 
meral recognition, as described in 
Fukushima, 10 is a nine-layer network 
with 1, 12, 8 S 38, 19, 35, 23, 11, and 10 
subnetworks per respective layer. 

in addition to these architectural dif¬ 
ferences, the setting of various internal 
parameters may also vary according to 
the application. More noise tolerance 
is provided by decreasing the inhibitory 
(‘'negative*') weights and shrinking l lie 
number of connections per node in a 
subnetwork. Finer degrees of class sepa¬ 
ration are provided by increasing inhi¬ 
bition and increasing the number of 
connections between the nodes in each 
subnetwork. A variety of other internal 
parameters can lx j altered as well. 

Given the goal of efficiently estab¬ 
lishing useful architectures and parame¬ 
ter settings for real-world applications, 
automatic generation of neural networks 
based upon a flexible representation 
of the desired characteristics is vital 
This goal has been realized through 
the development of the research envi¬ 
ronment described in this article. The 
environment dynamically creates neu¬ 
ral networks based upon the informa¬ 
tion encoded in underlying knowledge- 
re presentation structures. The research 
environment automatically builds these 
structures based upon parametric speci¬ 
fication of the desired characteristics 
of the network architecture. 

For example, passing the network 
creation routines the network type of 
neocognitron, the layer number 9, and 
the subnetwork size list of (/, 22, 8 t 
38. 19,35,23, 11, 10) would produce 
an architecture similar to the one de¬ 


an 


K ENVIRONMENT 


scribed by Fukushtma. 10 An exact match 
to Fukushima’s architecture could be 
obtained through additional parameter 
specifications. The key point is that the 
research environment comprises a com¬ 
bination of multipurpose routines that 
are pieced together appropriately 
through the use of flexible knowledge 
representation structures. The environ¬ 
ment’s flexibility is maintained through 
the stria application of software-modu¬ 
larization techniques. For example, soft¬ 
ware modularization ensures that weight 
calculation routines can be adjusted 
independently of the connection calcu¬ 
lation routines. These ideas are clari¬ 
fied in the following sections. 

Knowledge Representation 

There are two fundamental ideas be¬ 
hind the use of knowledge representa¬ 
tion. The first is that simple parametric 
changes can significantly alter the net¬ 
work architecture s final structure. For 
example, changing the size (number 
of nodes) in each subnetwork can 
greatly affect the specific connections 
between the nodes. This is of primary 
importance in networks such as the 
neocogn it ron 1 ft> r two re ast m s: 

1. The connect ions are taween subnet¬ 
works rather than within subnetworks. 

2, The nodes are not completely con¬ 
nected (that ts, every node is connected 
to only a subset of the nodes in other 
subnetworks). This means that the con¬ 
nection architecture is heavily influenced 
by the size and number of subnetworks. 

The second fundamental idea is that 
many routines for the creation of neu¬ 
ral networks and subsequent network 
processing are common to entirely dif¬ 
ferent architectures. As a result, these 
routines can be reused and, to some 
degree, tailored automatically by com¬ 
bining and adapting the modules. The 
realization of a research environment 
that automatically generates flexible neu¬ 
ral network architectures has, thus, been 
based upon a knowledge representa¬ 
tion in which every structure '‘carries 
around with if all lhe local informa¬ 
tion for piecing itself into the network 
puzzle and for subsequently computing/ 
processing data once the architecture 
is assembled. 

Three main knowledge structures — 
NETs, LAVERS, and PLANEs — collec¬ 
tively compose Lhe knowledge repre¬ 
sentation. These structures are presented 
in Listing One, page 93- The NET struc¬ 
ture consists of a list of one or more 
layers and a variety of local parameters 
specific to the global processing of the 
particular type of architecture (for ex¬ 
ample, the vigilance parameter in 
ART. 15 ) LAYER encodes a list of subnet- 












MS-DOS 386*486 


Can your C compiler handle this? 


/* sort one million 
data points */ 
int A [1000000]; 
qsort (A, 1000000,...) 


Meta Ware’s 
High C ® and 
Professional 
Pascal ™ — 

the first C and Pascal compilers to 
generate 386 protected-mode code for 
MS-DOS. And the compilers them¬ 
selves can run in protected mode, giving 
you the power to create large programs. 
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(continued from page 30) 
works and the connections between 
layers (e.g., a list of the connections 
from each subnetwork in the present 
layer to the subnetworks of the preced¬ 
ing layer). Local parameters, such as 
inhibition constants or gain constants, 
arc also stored within the layer. The 
type of the layer (for example, S or C 
for Lhe neocognitron 1 and Fj or F 7 in 
ART 3,S ) is also recorded. A pointer to 
the previous layer is provided so that 
the routines can "get around” in the 
network. PLANE, a subnetwork, is used 
Lo store the connections within the 
subnetwork. The weights for Ix>lh inter- 
and intraplane connections are also re¬ 
corded in the PLANE structure. A size 
parameter for the plane is used for 
instantiation and is locally encoded. A 
pointer to the layer of which this plane 
is a part is stored as well. The actual 
nodes (cells) or processing elements 
are .stored as an array, which is used 
to record output activation values. 

In the future, this array will be ex¬ 
tended so that each node is itself a 
knowledge structure. In this way, the 
activation functions, output functions, 
and local node parameters can lx* main¬ 
tained locally. Such an extended repre¬ 
sentation will further increase the environ¬ 
ment’s flexibility by providing for the 
adjustment of input and output activa¬ 
tion functions within the overall archi¬ 
tecture and, thereby, will extend the 
standard of common activation func¬ 
tions for each cell in the subnetwork. 
This standard for specific activation func¬ 
tions for the entire subnetwork is not 
a severe restriction. However, the ex¬ 
tended representation will support novel 
research endeavors and, thus, could 
prove to be extremely valuable. 

The information contained in these 
knowledge structures is stored ai the 
time of network instantiation and is 
utilized as the computational map by 
the processing routines. The structures 
thus dynamically control the routines 
to be called, the data to be passed, and 
the amount of processing to be per¬ 
formed, Each structure has been de¬ 
signed to carry locally all the informa¬ 
tion necessary to direct processing 
through the contents of the structure 
itself rather than through a priori rou¬ 
tines. This advantage increases process¬ 
ing flexibility. In adapting the flow of 
processing, no routines need to be al¬ 
tered; only the information in the struc¬ 
tures is modified. 

Modularity 

Great care has been taken to ensure 
software modularity. The significance 
of this is apparent upon analysis of the 
power obtained by the integration of 


knowledge representation and software 
modularization. Before discussing the 
integration, however, 1 will briefly de¬ 
scribe the modularity. 

Software modularity has been pre¬ 
served in all three of the main phases 
of neural network applications: instan¬ 
tiation, processing, and training. The 
network instantiation routines, high¬ 
lighted in Listing Two, page 93. are the 
pieces that are meshed to dynamically 
create network architectures. Instantia¬ 
tion is obviously the first step in the use 
of neural networks for any application. 
F lTie instantiation process proceeds from 
generic net-level creation routines to 
specific layer-levd creation routines that 
are tailored to the specific type of net¬ 
work. Finally, it proceeds to generic 
plane-level routines that perform con¬ 
nection and connection weight calcu¬ 
lations in addition to creation of the 
plane itself. Upon completion of the 
instantiation process, the network is 
ready for training. 

Listing Three, page 96, indicates the 
training routines. These routines are 
used to perform the processing all the 
way from the network level down to 
the level of the individual cell. Listing 
T h ree is a I reviated, h< weve r, a n d de¬ 
picts the routines only down to the 
initial processing at the plane level. 
Subsequent processing occurs at the 
plane, connection, and cell levels. Af¬ 
ter training, the network can lie used 
for identification tasks. Identification 
functions at the network level are pre¬ 
sented in Listing Four, page 98. Further 
processing occurs at the layer and plane 
levels but is not included here. 

Integration 

The knowledge representation struc¬ 
tures function as generic placeholders 
in which data about instantiated neural 
networks is recorded. As mentioned 
previously, the instantiation process dy¬ 
namically produces an entire network 
based on the parametric specification 
of the desired characteristics. Instantia¬ 
tion logins by calling CREATE-NET (see 
Listing Two) and passing it the appro¬ 
priate parameters for the desired net¬ 
work. 

Two examples of the parametric set¬ 
tings and function calls for different 
versions of a neocognitron are depicted 
in Listing Five, page 98. Evaluating *neo- 
cognitron-net* (that is, (eval *neocogni- 
tron-net*)) returns a NET structure (see 
Listing One) that contains an instanti¬ 
ated network meeting the characteris¬ 
tics specified in the parameters recorded 
in the *tteocognitron-net*v ariable. More 
specifically, a seven-layer network 
would be created. The input layer would 
contain one subnetwork (plane), and 


each of the other layers would contain 
24 planes. The plane in the input layer 
would contain a 16 x 16 array of nodes 
(cells). Each of the planes in the next 
layer would contain a 16 x 16 array of 
cells. Subsequent layers would be com¬ 
posed of planes with 10 x 10, 8x8, 6 
x 6, 2 X 2, and 1 x 1 arrays of cells, 
respectively. 

Each cell in a plane would have a 
"square 1 * projection partem; cells are 
connected to other cells that occupy a 
corresponding square area in another 
plane. Connections from the first layer 
to the Input layer would cover a 5 x 5 
array. Connections from the second 
layer Lo the first would also cover a 5 
x 5 array, and similarly for all the con¬ 
nections up to and including the con¬ 
nections from the sixth layer to the fifth 
layer. Connections between the last (sev¬ 
enth) and the sixth layer, however, would 
cover a 2 x 2 array. Each cell, x jT would 
thus become an input to multiple other 
cells, x jT and each x.- would receive 
inputs from many different x k cells. 

Each of these connections has asso¬ 
ciated with it a connection weight 
Within the knowledge representation, 
llic connection weights arc stored sepa¬ 
rately from tlie connections themselves 
so as to provide for adaptation of the 
weights independently of the connec¬ 
tion structure. In addition to these ele¬ 
ments common to all neural networks 
(that is, one or more layers, one or 
more subnetworks per layer, individ¬ 
ual cells, connections, and connection 
weights), a variety of other parameters 
significant for the neocognitron would 
be set as indicated in the *neocognUron- 
net* variable in Listing Five. 

An additional comment about the 
assignment of connections is impor¬ 
tant. The exact connection patterns are 
calculated based upon the size of rhe 
sending and receiving planes and the 
size of lhe projection area. The instan¬ 
tiation routines are structured such that 
the appropriate connections are com¬ 
puted based upon the parameters 
passed to tile respective routines. For 
example, if each element in a 5 x 5 
network is to project into a 3 x 4 net¬ 
work such thaL each element has a 2 x 
2 projection and all of the 3x4 net¬ 
work elements are covered, then the 
system would compute that the ele¬ 
ment in position (0,0) of the 5x5 
network would be connected to the 
elements in positions (0,0), (0,1), 0,0), 
and (1,1) of the 3 x 4 network (see 
Figure 1). The element in position (4,4) 
of the 5 x 5 network would be con¬ 
nected to the elements in positions (1,2), 
(1,3), (2,2), and ( 23 ) of the 3x4 net¬ 
work. A variety of standard connection 
architectures have been presented in 
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(continued from page 32) 
the neural network literature — for ex¬ 
ample ART, 3 ’ 5 ' 6 - 7 back propagation, 8 
Hopfield networks, 9 and the neocog- 
nitron. 1 Because the connection calcu¬ 
lation routines are parameterized and 
actually calculate the connection pat¬ 
terns, arbitrary algorithmically expressed 
connection patterns can be realized. 

Experimental Results 

To investigate the viability of the re¬ 
search environment presented in this 
article, a standard neural network ar¬ 
chitecture was chosen to test the envi¬ 
ronment's instantiation, training, and 
identification capabilities. The network 
chosen was the neocognitron 1 because 
of its large size and the complexity of 
the connection architecture. More spe¬ 
cifically, the architecture presented by 
Fukushima and Miyake 2 was repro¬ 
duced and is characterized by 'neocog- 
nitron-net* in Listing Five. For this ver¬ 
sion of a neocognitron, there are a total 
of more than 23M connections, each 
with its own weighting factor, between 
the 10K cells and 145 planes in the 
network. Additionally, several parame¬ 
ters interact and affect the behavior of 
the network. For example, each of the 
layers (excluding the input layer) has 
an intensity-of-inhibltion parameter to 
control the amount of noise tolerated 
in matching a pattern; this parameter 
interacts with both the excitatory and 
inhibitory weights as an output is com¬ 
puted for a particular network cell. 

Instantiation of the network, de¬ 
scribed by the *neocagnitron™net* vari¬ 
able in Listing Five, and subsequent 
training and identification testing yielded 
significant results: 

1. Different patterns produce different 
excitation patterns within the net¬ 
work (see Figures 2 and 3). 

2, 'Framing the network alters its exci¬ 
tation patterns (see Figures 3 and 4). 

3- After training, only a single cell fires 
at the recognition layer in response 
to different stimulus patterns (Fig¬ 
ure 4). 

4. Appropriate clusterings are achieved 
for multiple versions of various nu¬ 
meric characters (see Figures 4, 5, 
and 6), 

The input pattern is depicted at the 
base of each figure in Figures 2 through 

5. Each layer is represented by the dou¬ 
ble row of squares (planes), which are 
respectively labeled S t , C p S 2 , CL, S 3 , 
and C 3 on the right-hand edge of the 
figures. The colored areas within each 
square represent the output activities 
of the corresponding nodes (cells). The 
color scale is shown on the left-hand 
edge of the figures and indicates that 
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Figure 1: Connections calculated for 2 x 2 projections from a 5 x 5 network 
into a 3x4 network 
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Figure 2: Response characteristics of an instantiated neocognitron to the 
input pattern 0 before training 
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Figure 3t Response characteristics of an instantiated neocognitron to the 
input pattern 1 before training 
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activity ranges from a low level of black 
to blue, to green, to red, to yellow, to 
a high level of white. These pictures 
are produced within the research envi¬ 
ronment as a useful utility for qualita¬ 
tively observing the results of the par¬ 
ticular instantiated architecture. As de¬ 
picted herein, the results correlated well 
w ith those presented by Fukushinia and 
Miyake. 2 

Future Efforts 

The research environment and corre¬ 
sponding instantiation of neural net¬ 
works have many possible applications. 
From a general perspective, such ap¬ 


plications encompass both new-model 
development and the analysis of stan¬ 
dard network models. More specifically, 
one of the motivating ideas behind this 
research has been that of using digi¬ 
tized images as training patterns. The 
hypothesis is that network models such 
as the neocognitron should theoreti¬ 
cally be able to extract "useful” infor¬ 
mation from such images. For exam¬ 
ple, through training an instantiated 
network using a variety of images that 
contain a tree, the network should ex¬ 
tract the common pattern of the tree 
and, thus, be able to indicate the pres¬ 
ence of a tree in subsequent test images. 
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Figure 4: Response characteristics of an instantiated neocognitron to the 
input pattern 1 after training 
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Figure 5: Response characteristics of an instantiated neocognitron to the 
input pattern of a slanted 1 after training 
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A possible future research effort 
would investigate Lhe size of various 
networks required to actually perform 
such recognition and to characterize 
any additional requirements (for exam¬ 
ple, use of Grossberg's Boundary Con¬ 
tour/Feature Contour System [S . Gross- 
berg and E. Mingolla, "Neural dynam¬ 
ics of perceptual grouping: Textures, 
boundaries, and emergent segmenta¬ 
tions/' Perception & Psychophysics, 38 
(1985). 141 —171.1 as a preprocessor 
to simplify processing within an appro¬ 
priate version of a neocognitron). Ad¬ 
ditionally, recent extensions to the neo- 
cognitron’s architecture (that is, feed¬ 
back l>etween layers 3 ) could be incor¬ 
porated into the currently instantiated 
neoeognitrons and could possibly pro¬ 
vide for segmentation of trees within 
the test images after training has oc¬ 
curred. A significant amount of work 
would be required to obtain such re¬ 
sults, but a real possibility of attaining 
them does exist. 

On the front of run-time analysis of 
instantiated networks, the speed and 
versatility of processing related to the 
implementation of the environment 
should be considered. As mentioned, 
the present implementation, which was 
developed for in-house use, was de¬ 
veloped on a Symbolics Lisp machine. 
The lisp machine was chosen for its 
flexibility and power in symbolic ma¬ 
nipulation and for its exploratory 
programming environment. The im¬ 
plementation language is Lisp. In order 
to enhance processing speed, there is 
a plan to port the environment to a Sun 
4/280, Although the environment is cur¬ 
rently organized to dynamically create 
Fukushima s neocognitronr its versatil¬ 
ity will l>e tested by instantiating addi¬ 
tional neural network models. 

Conclusion 

The main virtue of the environment 
described here is that it frees the user/ 


programmer/researcher from the need 
to write programs that assemble neural 
networks; the environment automati¬ 
cally generates flexible neural network 
architectures based upon parametric 
specifications. Flexibility is achieved 
through the integration of knowledge- 
representation and standard software- 
modularization techniques. Together, 
these two types of techniques form the 
powerful basis of a research environ¬ 
ment for neural networks. 

The mechanisms through which the 
power is harnessed and utilized are the 
heart of this article. The key idea is that 
a knowledge representation has been 
developed so that each element of a 
neural network carries around with it 
all the information necessary for local 
processing (for example, what process¬ 
ing to perform and where to get the 
inputs). Because this Information stor¬ 
age is consistent from the node level 
to the network level, the entire net¬ 
work is executed without the need for 
global routines to encode its structure. 
Generic routines become specialized 
processors as they are adapted by the 
contents of the knowledge structures. 

The viability of such an environment 
has been demonstrated through the in¬ 
stantiation and testing of a standard 
network architecture, the neocognitron. 
The results correlate accurately with 
those of an analogous network de¬ 
scribed by Fukushima and Miyake. The 
present work suggests many signifi¬ 
cant applications, some of which are 
currently under investigation. 

Knowledge representation and soft¬ 
ware modularization are key tools ide¬ 
ally suited for the empirical analysis of 
neural networks. Wrapping an envi¬ 
ronment around these fundamental 
tools facilitates concentration on net¬ 
work-response characteristics rather 
than on monotonous debugging of spe¬ 
cialized routines that encode network 
architectures. 
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Figure 6: Patterns that are properly recognized by an instantiated neocognitron. The 
neocognitron was first trained on the patterns in the leftmost column 
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over a gigabyte of public domain 
software. 

Coherent also comes with Lex 
and Yacc, a complete C compiler and 
a full set of nearly 200 UNIX com¬ 
mands including text processing, 
program development, administrative 
and maintenance commands. 

And with UUCR the UNIX to 


UNIX Communication Pro¬ 
gram that connects you to a 
world-wide network of free soft¬ 
ware, news and milli ons of users. 
All for the cost of a phone call. 

We could go on, but stop 
we must to get in a few more very 
important points. 

EXPERIENCE. SUPPORT 

AND GUARANTEES. 

Wondering how something as 
good as Coherent could come from 
nowhere? Well it didn’t. It came from 
Mark Williams Company, people 
who’ve developed C compilers for 
DEC, Intel, Wang and thousands of 
professional programmers. 

We make all this experience avail¬ 
able to users through complete techni¬ 
cal support via telephone. And from 
the original system developers, too! 

Yes, we know $99.95 may still 
be hard to believe. But we’ve made it 
fool-proof to find out for yourself. 

With a 60-day money-back no-hassles 
guarantee. 

You have to be more than just a 
little curious about Coherent by now. 
So why not just do it? Pick up that 
phone and order today. 

You’ll be on your way to having 
everything you ever wanted in UNIX. 
And for a lot less than you ever 


1-800-MARK WMS 

(1-800-627-5967 or 1-708-689-2300) 
60-DAY MONEY BACK GUARANTEE! 


Mark Williams 
Company 

601N. Skokie Highway 
lake Bluff, It, 60044 

‘Special introductory price good through July 31,1990. Coherent 
b a trademark of Mark Williams Company. UNIX is a trademark 
of AT&T. XENIX is a trademark of Microsoft 












Untangling 

Neural Nets 

When is one model better than another? 


Jeannette "Jet" Lawrence 


N eural networks, w r hich are 
formed by simulated neurons 
connected together much the 
same way the brain’s neurons 
are, are able to associate and 
generalize without rules, They have 
been used to classify undersea sonar 
returns, speech, and handwriting, pre¬ 
dict financial trends, evaluate person¬ 
nel data, control robot arms, model 
cognitive phenomena, and much more. 
The kinds of problems best solved 
by neural networks are also those that 
people do well: Association, evaluation, 
and pattern recognition. Neural net¬ 
works also handle problems that are 
difficult to compute and do not require 
perfect answers — just quick, good an¬ 
swers, This is especially true in real¬ 
time robotics or industrial controller 
applications. 

Other appropriate applications are 
predicting behavior and analyzing large 
amounts of data, such as in stock mar¬ 
ket forecasting and consumer loan analy¬ 
sis. New applications under develop¬ 
ment include simple vision systems, 
weather forecasting, assistance in medi¬ 
cal diagnosis, and estimation of Lhe 
worth of insurance claims. 


Jeannette (Jet) Lawrence is technical pub¬ 
lications manager at California Sci¬ 
entific Software, and the author of their 
1989publication Introduction to Neural 
Networks, She can be contacted at J60 
E. Montecito Sierra Madre, CA 91024\ 



A neural network is not always the 
best solution for certain problems. They 
are poor at precise calculations and 
serial processing, nor are they able to 
predict or recognize anything that does 
not inherently contain some sort of pat¬ 
tern. This is why, for example, a neural 
net cannot predict the lottery, because 
a lottery is by definition a random pro¬ 
cess. 

It is unlikely that a neural network 
could be built that has the capacity to 
think as well as a person does for two 


reasons: Neural networks are terrible 
at deduction (logical thinking), and the 
human brain is too massively complex 
to simulate completely. A human brain 
contains about 100 billion neurons, each 
of which connects to about 10,000 other 
neurons. 

A brief look at the general structure 
and operation of neural networks will 
help explain the limits of neural net¬ 
works abilities. There are many types 
of neural networks, but all have three 
things in common: Distributed process¬ 
ing elements (neurons), the connec¬ 
tions between them (network topol¬ 
ogy), and the learning rule. These three 
aspects together constitute the neural- 
network paradigm. 

The Formal Model of a Neuron 

Artificial neurons are also known as 
processing elements, neurodes, units, 
or cells. Figure 1 shows the canonical 
model of a neuron. Each neuron re¬ 
ceives the output signals from many 
other neurons. The point where two 
neurons communicate is called a "con¬ 
nection.” This neural connection is analo¬ 
gous to a biological synapse in the 
mammalian brain, A neuron calculates 
its output by finding the weighted sum 
of its inputs. The strength of a particu¬ 
lar connection, called its weight, is noted 
where i is the receiving neuron and 
j is the sending neuron. 

At any point in time (f), the activa¬ 
tion function, adds up the weighted 
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UNTANGLING NEURAL NETS 


(continued from page 38) 
inputs to produce an activation value 
a^t), In most models, input signals can 
either be excitatory or inhibitory, that 
is, they either tend to make the neuron 
fire or tend to suppress its firing. This 
value is passed through an output (or 
transfer) function f js which produces 
the actual output for that neuron for 
that time, o.(t). 

After summation, the net input of the 
neuron is combined with the previous 
state of the neuron to produce a new 
activation value. In the simplest mod¬ 
els, the activation function is the 
weighted sum of the neuron's inputs; 
the previous state is not taken into ac¬ 
count. In more complicated models, 
the activation function also uses the 
previous output of the neuron, so that 
the neuron can self-exdte. These acti¬ 
vation functions slowly decay overtime; 
an excited state slowly returns to an 
inactive level. Sometimes the activa¬ 
tion function is stochastic, that is, it 
includes a random noise factor. 

The transfer function of a neuron 
defines how the activation value is out¬ 
put. The earliest models used a linear 
transfer function. However, certain prob¬ 
lems are not entirely reducible by purely 
linear methods. The threshold transfer 
function is the simplest of the non¬ 
linear models. This function is an all-or- 
nothing function; if the input is greater 
than some fixed amount (the thresh¬ 
old), the neuron will output a 1; if the 
value is below the threshold, the neu¬ 
ron will output a 0. 

Sometimes the transfer function is a 
saturation type of function; More exci¬ 
tation above some maximum firing level 
has no further effect. A particularly use¬ 
ful transfer function is called the 
"sigmoid function," which has a high- 
and a low-saturation limit and a pro¬ 
portionality range in between. This func¬ 
tion is 0 when the activation value is a 
large negative number. The sigmoid 
function is 1 when the activation value 


is a large positive number and makes 
a smooth transition in between. 

The behavior of the network depends 
heavily on the way die neurons are 
connected. In most models, the indi¬ 
vidual neurons are grouped into layers 
so that the output from each neuron 

The transfer function of 
a neuron defines how 
the activation value is 
output 


in one layer Is fully interconnected w ith 
the inputs of all the neurons in the 
next layer, A network may include in¬ 
hibitory connections from one neuron 
to the rest of the neurons in the same 
layer called 'lateral inhibition/' Some¬ 
times a network lias such strong lateral 
inhibition that only one neuron in a 
layer, usually the output layer, can be 
activated at a time. Tit is effect of mini¬ 
mizing the number of active neurons 
is known as "competition." In a feed- 
lb ward network, neurons in a given 
layer do not take inputs from subse¬ 
quent layers or from layers prior Lo the 



Figure I; 1 he formal model of a neural- 
network processing element 



Figu re 2: A taxonomy of neural-network types 


immediately previous layer. Also, the 
neurons in a feed-forward network usu¬ 
ally do not connect to each other. The 
back propagation network typically has 
three feed-forward layers: Input, hid¬ 
den, and output. Feedback models ad¬ 
ditionally include connections from the 
outputs of one layer to the inputs of the 
same or a previous layer. 

A neural network learns by adapting 
to changes in the input. This is accom¬ 
plished through changes in the weights 
as the network gains experience. The 
learning rule is the very heart of a neu¬ 
ral network; it determines how the 
weights are adjusted as the neural net¬ 
work gains experience. Of the numer¬ 
ous learning rules in use, the most well- 
known are Hebb’s Rule and the Delta 
Rule. Nearly all other rules are vari¬ 
ations of these two. 

More than 30 years ago, Donald O. 
Hebb theorized that biological associa¬ 
tive memory lies in the synaptic con¬ 
nections between nerve cells, and that 
the process of learning and memory 
storage involved changes in the strength 
with which nerve signals are transmit¬ 
ted across individual synapses. Hebb’s 
Rule states that pairs of neurons that 
are active simultaneously become 
stronger by synaptic (weight) changes. 
The result is a reinforcement of those 
pathways in the brain, HeblVs Rule states 
Aw.j = ya.Oj where V is the learning rate 
that specifies a scaling factor for changes 
during training. 

The Delta Rule, a supervised learn¬ 
ing algorithm, additionally states that 
if there is a difference between the 
actual output pattern and the desired 
output pattern during training, then die 
weights are adjusted to reduce the dif¬ 
ference. The Delta Rule states Aw = 
V(t - a^o., where t t is the training (de¬ 
sired output) pattern. The back-propa¬ 
gation rule is a generalization of the 
Delta Rule for a network with hidden 
neurons. 

The best learning rule to use with 
linear neurons is the Delta Rule. This 
allows arbitrary associations to be 
learned, provided that the inputs are 
al! linearly independent. Other learn¬ 
ing rules (such as Hebb’s) require that 
the inputs also be orthogonal. 

The Two Major Topologies 

Neural networks can be arbitrarily cate¬ 
gorized by topology, neuron model, 
and training algorithm. (Figure 2 shows 
one method of classifying neural net¬ 
works.) There are two main subdivi¬ 
sions of neural network models; Feed¬ 
forward and feedback topologies. 

Feedback models can lie constructed 
or trained. In a constructed model Lhe 
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DBMS Case Study: 



The Exxon Valdez Disaster 


24, 19S9, Exxon VALDEZ tanker runs 
iground, creating the worst oil spill in L.S, history. 
11,000,000 gallons contaminate the pristine waters 
of Alaska’s Prince William Sound, 


Major disasters, like the 
Exxon Valdez spill, 

require quick response based on careful data 
analysis. Fortunately, an easy-to-use database 
was already being created which would help. 

The Application The Alaskan Marine 

Contaminants 

Database lets oceanographic chemists easily 
access 60 megabytes of data covering the past 
decade. The database is provided free of 
charge on CD-ROM, and the Windows 
interface means they can get right to work, 
assessing damage to the ecosystems of Prince 
William Sound and other Alaskan waters. 

The Solution dbVISTA III is the only 
DBMS with the features 
this project required: C language support, 
Windows compatibility, royalty-free runtime 
distribution, quick performance in large data¬ 
bases, quality documentation and support. With 
the Alaskan Marine Contaminants Database, 
the difficult job of calculating the long-term 
effects of the Exxon spill is a little easier.* 
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A Micros of/ Windows front end lets chemists select regions from a map 
to retrieve data. And. dh VISTA Ill's SQL-based query and report 
writer lets users perform complex SQL data searches, 


Your DBMS problems may not make the 
headlines, but they are no less important and 
often no less challenging. Tf you develop 
applications for MS-DOS, MS Windows, 
UNIX, VMS, QNX, OS/2, Macintosh, and 
other environments, db_VISTA III is your 
solution. 

Call 1-800-db-RAIMA (1-800-327-2462) 

* Reprints of the story, as published in PC Week untl Dam Based Advisor, 
are available from Raima. 
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(continued from page 40) 
weight matrix is created by taking the 
outer product of every input pattern 
vector with itself or with an associated 
input, and adding up all the outer prod¬ 
ucts. After construction, a partial or 
inaccurate input pattern can be pre¬ 
sented to the network, and after a time 
the network should converge so that 
one of the original input patterns is the 
result, Hopfield and BAM are two well- 
known constructed feedback models. 

The Hopfield network is a self-or¬ 
ganizing, associative memory. It is the 
canonical feedback network. It is com¬ 
posed of a single layer of neurons that 
act as Ixith output and input. The neu¬ 
rons are symmetrically connected (w..« 
w.p. (See Figure 3 ) Hopfield networks 
are made of nonlinear neurons capa¬ 
ble of assuming two output values: -1 
(ofO and +1 (on). The linear synaptic 
weights provide global communication 
of information. In spite of its apparent 
simplicity, a Hopfield network has con¬ 
siderable computational power. 

The weight matrix is created by tak¬ 
ing the outer product of each input 
pattern vector with itself, and adding 
up all the outer products. After con¬ 
struction, a pattern Ls given to the net¬ 
work. A process of reaction-stimulation- 
reaction between neurons occurs until 
the network settles down into a fixed 
pattern called a "stable state,” Thus, 
the network result comes as a direct 
response to input. 

The energy required by a device to 
reach a stable state can l^e plotted in 
three dimensions as a curved surface. 
In this representation, the stable states 
of the system (the energy minimums) 
appear as valleys. A neural network, 
which is used to find "good enough” 
solutions to optimization problems, may 
have many possible energy minimums 
or valleys. Depending upon the initial 
state of the network, any of the deepest 
valleys may end up as the answer. In- 
puting incomplete information to an 
associative memory network causes the 
network to follow paths to a nearby 
energy minimum where the complete 
information is stored. 

Hopfield networks can recognize pat¬ 
terns by matching new inputs with the 
closest previously stored patterns. 
Hopfield networks are especially good 
for finding the best answer out of many 
possibilities. They are also good at re¬ 
calling all of a stored piece of informa¬ 
tion when given partial data, Hopfield 
networks are often used in applica¬ 
tions requiring some form of content 
addressable memory. 

While the Hopfield model is able to 
associate on a Large scale, it does not 
learn; the weights must be set in ad¬ 


vance, A serious limitation of the 
Hopfield model is that the maximum 
number of memories M, which can be 
stored while still retaining perfect re- 

A neural network learns 
by adapting to changes 
in the input 


call is [M less than or equal to N/(4 log 
N)] where N is the number of neurons. 
If more memories are stored, then the 
stable states begin to differ significantly 
from the stored information and even¬ 
tually all will be forgotten. If an error 
rate of 5 percent is tolerable, then the 
capacity is about 14 percent of N. The 


hardware efficiency is also poor. A vari¬ 
ation has been proposed, called the 
"Unary or Hamming” network, which 
uses inhibitory lateral connections in 
the internal neurons. It is claimed that 
this model has a capacity of M » N 
with no errors in the final state, 

Bart Kosko brought the Hopfield net¬ 
work to its logical conclusion with the 
BAM, The BAM (bidirectional associa¬ 
tive memory) is a generalization of the 
Hopfield network. Instead of creating 
the weight matrix with the dot product 
of a pattern with itself (auto-associa¬ 
tion), pairs of patterns are used (pair 
association). After construction of the 
weight matrix, either pattern can be 
applied as input to elicit as output the 
other pattern in the pair. 

A trained feedback model is much 
more complicated because adjustment 
of the weights affects the signals as 
they move forward as well as back- 




Figure 4: The topology of a hack propagation neural network 
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ward. The Adaptive Resonance Theory 
(ART) model is a complex trained feed¬ 
back paradigm developed by Stephen 
Grossberg and Gail Carpenter of the 
Center for Adaptive Systems at Boston 
University. ART is considered by some 
to be very powerful, but the number 
of patterns that can be stored is limited 
to exactly the number of nodes in the 
storage layer. No production applica¬ 
tions have been published to date; ART 
is presently considered a research took 

Feed-forward Topologies 

The second division of neural networks 
is the feed-forward category. The earli¬ 
est neural network models were linear 
feed-forward. In 1972, two simultane¬ 
ous papers independently proposed the 
same model for an associative mem¬ 
ory, the linear associator, J.A. Ander¬ 
son, a neurophysiologist, and Teuvo 
Kohonen, an electrical engineer, were 
not aware of each other s work. 

The linear associator uses the simple 
Hebb's Rule. The only case w here as- 
sociation is perfect when simple Heb- 
hian learning is used is when the input 
patterns are orthogonal. This puts an 
upper limit on the number of patterns 
that can be stored. The system will 
work very well for random patterns if 
the maximum number of patterns to 
be stored is 10 — 20 percent of the num¬ 
ber of neurons. If the input patterns are 
not orthogonal, there will he interfer¬ 
ence among them; fewer patterns can 
be stored anti correctly retrieved. One 
of the predictions of the linear associa- 
Lor is interference between nonorthogo- 
nal patterns. Much of Kohonen's book, 
Self-Organ izat ion a mi Assoc iat ive Mem¬ 
ory (Springe r-Verlag, 1984) is concerned 
with correcting the errors caused by 
interference. 

The nonlinear feed-forward models 
are the most commonly used today. 
Feed-forward networks, for historical 
reasons, are less often considered to 
be associative memories than the feed¬ 
back networks, even though they can 
provide exactly the same functionality. 
It can be shown mathematically that 
any feedback network has an equiva¬ 
lent feed-forward network Lhat performs 
the same task. 

Types of Learning Algorithms 

There are two main types of training 
algorithms; Supervised and unsuper¬ 
vised, Supervised learning is the most 
elementary form of adaptation. It re¬ 
quires an a priori knowledge of what 
the result should be. During training, 
the network's output is compared to 
the ideal response, and any error is 
used to correct the network. Learning 
occurs as a result of changes to the 


weights to reduce the errors as the 
network gains experience. For one- 
layer networks this is easily accom¬ 
plished by monitoring each neuron 
individually. In multi-layer networks, 
supervised learning is more difficult 
due to the correction of the hidden 
layers. Unsupervised learning differs 
in that it does not have specific correc¬ 
tions made by comparison to ideal re¬ 
sults. Supervised and unsupervised learn¬ 
ing are methods which are used exclu¬ 
sively of each other. 

The supervised back propagation 
model is the most commonly imple¬ 
mented paradigm today because it is 
the best general-purpose model and 
probably the best at generalization, ( This 
model Is used by the “BrainMakeF* soft¬ 
ware from California Scientific Software.) 
Back propagation is a multi-layer feed¬ 
forward network that uses the General¬ 
ized Delta Rule. 

By 1985, back propagation had been 
simultaneously discovered by three 
groups of people: D.E, Rumelhart, G .E. 
Hinton, RJ, Williams; Y. Le Cun; and 
D. Parker, Back propagation is the ca¬ 


nonical feed-forward network where 
an error signal is fed back through the 
network, altering weights as it goes, in 
order to prevent the same error from 
happening again. (See Figure 4.) 

The error on an output neuron, i, for 
a particular pattern, p, is defined as E j 
= (T . - O pi ) where T is the training 
(desired) pattern and O is the actual 
output. The total error on pattern p, E , 
is the sum of the errors on all the out¬ 
put neurons for pattern p. The total 
error, F, for all patterns is the sum of 
the errors on each pattern over all p. 
The simplest method for finding the 
minimum of E is known as “gradient 
descent/' Tt involves moving a small 
step down the local gradient of the 
scalar field. This is directly analogous 
to a skier always moving down hill 
through the mountains until he hits the 
bottom. 

Back propagation is useful because 
it provides a mathematical explanation 
for the dynamics of the learning pro¬ 
cess. It is also very consistent and reli¬ 
able in the kinds of applications that 
can currently be built. The biggest limi- 
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tat ion is the size of the network. The 
back propagation network "NctTalk" 
uses about 325 neurons and 20,000 
connections. A useful visual recogni¬ 
tion system probably requires at least 
125,000 connections* Currently avail¬ 
able commercial systems provide any¬ 
where from a few neurons and con¬ 
nections to 1 million neurons and 1.5 
million connections, for anywhere from 
$200 to $25*000, 

A popular unsupervised feed-forward 
model is the Kohonen model. The ba¬ 
ste system is a one- or two-dimensional 
array of thresh old-type logic units with 


short-range lateral connections l^etween 
neighboring neurons. The system modi¬ 
fies itself so that nearby neurons re¬ 
spond similarly. The neurons compete 
in a modified winner-take-ail manner. 
The neuron whose weight vector gen¬ 
erates the largest dot product with Lhe 
input vector is the winner and is per¬ 
mitted to output. In this model not only 
the weights of the winner but also those 
of its nearest neighbors (in the physical 
sense) are adjusted, 

One of the problems with Kohonen 
learning is that there is a possibility 
that a neuron will never “win/* or that 


one will almost always "win.” The 
weight vectors get stuck in isolated re¬ 
gions. One way to prevent the weight 
vectors from getting stuck is to start off 
with ail the weight vectors equal. The 
network is first fed fractional amounts 
of the patterns. The inpuLs are then 
slowly built up to the full input pat¬ 
terns, This method, called “convex com¬ 
bination," works well but it slows down 
learning. Another preventative method 
is to add noise to die data, which makes 
the probability density function posi¬ 
tive everywhere. The probability den¬ 
sity function is a real-valued function 
that gives the probability that a random 
variable has values in the set. This 
method works, but it is even slower 
than convex combination. Another ap¬ 
proach is to give the neurons a "con¬ 
science"; if the neurons realize that 
they are winning a lot, they will step 
out of the competition for a while. 

A special case of the feed-forward 
model is the Neocognitron. The origi¬ 
nal nuxlel was unsupervised, but a more 
recent model (1983) uses a teacher* 
The multi-layer (seven- or nine-layer) 
system assumes that the builder of the 
network knows roughly what kind of 
result is wanted. All the neurons are of 
analog type; the inputs and outputs 
take non negative values proportional 
to the instantaneous firing frequencies 
of actual biological neurons* In the origi¬ 
nal model, only the maximum-output 
neurons have their input connections 
reinforced It uses a variation of the 
Hebbian Rule. After learning is com¬ 
pleted, the final Neocognitron system 
is capable of recognizing handwritten 
numerals presented in any visual field 
location, even with considerable dis¬ 
tortion. Drawbacks of the Neocogni- 
iran are that it is highly specialized and 
requires a large number of neurons 
and connections* 

Conclusion 

Neural networks are capable of some 
impressive things but they are also lim¬ 
ited, primarily by the size of the network 
and die complexity of the problem. They 
are especially good at association and 
generalization, but poor at precise com¬ 
putations and logic. Some models are 
able to generalize better than others, 
some are good at association. 

With more than 40 functioning mod¬ 
els to choose from, it is important to 
know which models have had the most 
success and to understand their simi¬ 
larities and differences. Currently, back 
propagation is the most popular model. 
Several others are discussed in detail 
in this issue, each has it own merits. 
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We can save you from one of them . 


S orry. Death we can't do anything about. As for 
taxes, when you use our product you'll probably 
wind up paying more. But software piracy: 
there we offer some help. Our family of software 
protection devices (dongles) have improved unit sales 
for over 2,000 companies around the world. 

Our products can be used in the MS-DOS, 

OS/2 and Macintosh environments. 

Build Your Own Custom Protection 
Environment 

Use our patented “dual¬ 
locking” ASIC chip as the 
basic building platform. 

Next, add options like: on- 
the-fly read/write memory, 
write-once or multiple-write 
locking codes, and encryp¬ 
tion shells. Then add your 


own programming creativity to build a protection envi¬ 
ronment best suited to your product. 

Users attach the device to their parallel port, and 
programs won't run without it. Back-up copies, hard 
disk and LAN operation are not interfered with. 

Your Intellectual Property Belongs To 
You 

And if you don't protect it, who will? Our 
products offer the most equitable way to 
protect your interests with¬ 
out sacrificing the rights of 
your customers. Call us 
today for information and 
demonstration units. 
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Activator. Macti valor are trade marks of Software 
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Michelangelo s Last Judgement 
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Implementing the 
Rhealstone Real-Time 

Benchmark 


Where a proposal's rubber meets the real-time road 


Rabindra P. Kar 


I n February 1989, the late Kent Por¬ 
ter and l proposed a set of bench¬ 
marking operations for real-time 
multitasking systems (see "Rheal¬ 
stone: A Real-Time Benchmarking 
Proposal;’ DDJ t February 1989), That 
article generated a lot of interest and 
many valuable suggestions from DDj 
readers, as well as others in the real¬ 
time software community. The reader 
response made it possible for us to 
refine and clarify several important as¬ 
pects of the original benchmark pro¬ 
posal. T am very grateful to those of 
you who shared your insights with us. 

Tliis article presents the refined defi¬ 
nition of the Rhealstone benchmark. It 
also contains a suite of C programs that 
implement the benchmark under iRMX, 
a real-time operating system from Intel, 
Refer to tile original proposal for the 
rationale behind proposing Rhealstones 
in the first place, and for background 
information on the real-time multitasking 
operations that comprise it. 

First, I’ll give a quick summary of 
what the Rhealstone benchmark is and 
what it seeks to measure. The bench¬ 
mark identifies the execution times (or 
time delays) associated with six opera¬ 
tions that are vital indicators of real¬ 
time multitasking system performance. 
These six operations are named "Rheal¬ 
stone components.” When a real-time 
system is benchmarked, each of these 


Robin is a senior engineer with the 
Intel Systems Croup and can be reached 
at 5200 N.E, Elam Young Parkway, 
Hillsboro, OR 97124-6497, 


components is measured separately. The 
empirical results are combined into a 
single Figure of merit (Rhealstones per 
time unit). There are two ways of cal¬ 
culating the Rhealstone number: One 
of them generic and one of them ap¬ 
propriately weighted for a particular 
type of application (an application- 
specific Rhealstone). 

Rhealstones are intended to provide 
a standard of comparison between real¬ 
time computers across the industry. 


Hence, their specification is- a. Inde¬ 
pendent of the features found in any 
CPU; b. Independent of any computer 
bus architecture; e Independent of the 
features or primitives of any operating 
system or kernel (collectively referred 
to hereafter as real-time executives). 
The C language implementation of 
the benchmarks is, of course, specific 
to an operating system (iRMX in this 
case). However, the OS-specific part 
of the code is confined to a few system 


Reader’s Rhealstone 
Recommendations 


When the original Rhealstone pro¬ 
posal was put forth more than a year 
ago, MJ/solicited comments, sugges¬ 
tions, and recommendations from read¬ 
ers, In addition to the individuals Robin 
has acknow ledged in this article, the 
following readers contributed com¬ 
ments. If any contributors were left 
off this list, it is unintentional and we 


apologize — please let us know r who 
you are. The version of the bench¬ 
mark presented in this article does 
not necessarily represent Rhealstone 
as it will look in years to come. We 
look forward to your suggestions and 
recommendations for tiiis version too. 

— Eds. 


Mark Smotherman, Clemson University; Glenn Yeager, Applied Integration 
Management Corp,; Colburn L. Norton, Baytow n, Texas; Gary Osborne, 
Apricot Computers; Jim D, Hart, Papillion, Nebraska; John Morgan, Belling¬ 
ham, Washinton; G, Bruce Lott, Real Time Systems; Michael S* Sossi, Leo 
Burnett USA; Rudi Borth, Stratford, Ontario; Carol Sigda, Industrial Program¬ 
ming Inc,; Phil Daley; Hillsboro, New Hampshire; Tim Olson, Advanced Micro 
Devices, 
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Code-dweller emerges from the jungle 


C4T t T s a jungle in there ” said the pro- 

Jl grammer looking at the code for the 
user interface of an application. “Every year 
it gets worse." 

Don't despair. Finally, there is a way out 
Vermont Views™ 2*0. 

From Complexity to Simplicity 

Vermont Views 2.0 replaces the complexi¬ 
ties of interface coding with the simplicity of 
the Vermont Views Designer. This powerful 
interactive forms designer works in concert 
with our comprehensive library of over 530 
functions to make interface development 
and management quicker and easier than 
ever before. 

Development Will Never Be 
the Same Again 

With the Vermont Views Designer you will 
quickly create operational prototypes of an 
application interface—and enjoy doing it! 
Because design is fast and visual, you will 
involve your clients actively from the begin¬ 
ning* Last-minute change requests will be 
accepted without battles or escalating costs. 

No longer will you throw away months of 
prototype code— 
the prototype will 
become the imple- 
mentation. And f 
integration and final 
testing will go faster, because all Designer objects 
are tested for validity as they are created. 


No More Maintenance Blues 

Software maintenance typically accounts 
for over 50 percent of total lifecycle pro¬ 
gramming effort—and a higher percentage 
of headaches. With the \fermont Views 
Designer, you will always be able to revise the 
interface quickly and easily, seeing the 
changes as you make them. 

The Vermont Views 
Difference 

Screen generators for 
mostC libraries require you 
to modify generated source 
code to create fully func¬ 
tional forms—after which 
you can no longer use the 
screen generator. Not so with the Vermont 
Views Designer, Designer forms and menus 
can incorporate any of the special capabili¬ 
ties of Wrmont Views—such as nested 
menus, scroll bars, tickerrape fields, scroll¬ 
able form regions, choice lists, and memo 
fields—and still be revised interactively. 


Message from the Jungle 

“At a recentfield staff meeting, we were able to get 
a consensus on what/arms should look like by 
using the Designer on a big screen TV, Changes 
can be posted real-time, and afunctioning proto¬ 
type results from the exercise* The form designer 
is GREAT” 

—Randy Jones, Beta Tester 


Globally Applicable 

Use Vermont Views with any database or 
file manager with a C-language interface, 
such as Oracle, Informix, dBase, Clipper, 
dbVista, Btrieve, and C-nee. Maintain the 
same interface with the same source code 
under DOS, OS/2, UNIX, XENIX, and VMS. 

Create interfaces for any 
roman-based language. 
Truly a global solution for 
your interface needs. 

100% No-Risk 
Guarantee 

We believe in our pro¬ 
duct. Tty Vermont Views 
for as long as you want. 
No limits. If not fully satisfied, return for a full 
refund. 


Free Test Drive 

Call now for a free DOS working copy of 
the Designer, lacking only the ability to 
save forms* Get out of that jungle! 

Call 800-848-1248 
Fax 802-848-3502 


Vermont 
Creative 
Software 

Pinnacle Meadows, Richford, VT 05476 
Phone: 802-848-7731 Telex: 510-601-4160 
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(continued from fjage 46) 
calls (to create tasks, put them to sleep, 
accept/relinquish semaphores, and so 
on) that are found in almost every mul¬ 
titasking executive. The C benchmark 
source is easily portable to most other 
executives if the iRMX system calls in 
it are replaced by the equivalent sys¬ 
tem calls of the target executive. 

When a computer is used in a real-time- 
control situation, the solution usually 
fits the model described in Figure 1 * 

'*Real-time computer system"' refers 
jointly to the CPU and system software 
(OS, kernel, or combination thereof) 
that provide a base execution vehicle 
for the application software. The Rheal- 
stone benchmark helps the real-time 
solution designer choose the highest- 
performance real-time computer avail¬ 
able as the execution base for the pro¬ 
ject. Rhealstones are not designed to 
measure how good the complete solu¬ 
tion is, and they may not he an appro¬ 
priate measure for the end user. 

Rhealstone Components 

The specifications for the six real-time 
operations (Rhealstone components) 
thaL comprise the benchmark are de¬ 
tailed in the following section. For a 
graphical specification of each compo¬ 
nent, refer to Figures 2 through 7. Each 
comp one nt T s spedfi cat ion is fo 11 owed 
by a paragraph (or two) describing the 
C benchmark program used to meas¬ 
ure the Rhealstone component on iRMX 
11. It is important to realize that the 
verba 1 a nd gra phtea I speciflca tion s, n ot 
the C programs, are the essential core of 
die benchmark. It is entirely possible to 
obtain more accurate Rhealstone com¬ 
ponent values by using different algo¬ 
rithms or programming languages or 
special performance-analysis hardware. 

The task-switch time (see Figure 
2) is the average time to switch be¬ 
tween two active tasks of equal prior¬ 
ity. Tlie tasks should be independent — 
that is, there should not be contention 
between them for hardware resources, 
semaphores, and so on. Task switch¬ 
ing must be achieved synchronously 
(without preemption) — for example, 
when the running task puts itself to 
sleep or when the executive imple¬ 
ments a round-robin scheduling algo¬ 
rithm for equal-priority tasks. 

Listing One (Iswit.c), page 100, is a 
program to measure task-switch time. 
The code of task! and task2 is identical 
and very simple: A loop in which rqsleep 
gets called in every iteration. The iRMX 
system call rqsleepi sleep_time, re - 
tiim_code_ pointer) lets a task put it¬ 
self to sleep (suspend execution) lor 
sleep_time system clock ticks (in iRMX, 
the default clock tick is 10 milliseconds 


long). If sleepjtime is 0 T the task is not 
necessarily put to sleep; rather, iRMX 
will switch execution to any other equal- 
priority task that is ready to run (which 
is why this program calls rqsleep). 

The return_code_ pointer is the last 
parameter of every iRMX system call. 
It points to an unsigned variable in 
which iRMX places the status of the 
call. If the status returned is 0, Lhe call 
has been executed correctly; if this is 
not so, die status returned is an error 
or warning code indicating why the 
call did not execute as it should have. 

Th e ca 11 rqgettime ( ret 11 rn_cade_ 
pointer) returns the number of sec¬ 
onds that have elapsed since a fixed 
point in time. It is called twice, to meas¬ 
ure the elapsed time (in seconds) be¬ 
tween any two points in a program. 

The call rqc tea let ask (priority_level t 
stcirt_address f data_seg, stacks pointer .; 
stack_size. task_ flags, retum_code_ 
pointer ) creates a new task, as its name 
suggests. The first parameter sets the 
new task’s priority between 0 ( highest 
priority) and 255 (lowest priority). The 


other parameters are either self-explana¬ 
tory or iRMX programming details. This 
call returns a task_token that becomes 
iRMX’s identifier for the task. Conse¬ 
quently, the rqdeletetaskf task_token, re¬ 
turn _code'^pointer) call uses task_ to¬ 
ken to identify which task is to be 
deleted. If task_token is NULL or 0, the 
task deletes itself. 

The rqgetpriorityf I as k_ token, re- 
turn_code_pointer /call lets a task find 
out the priority level of any existing 
task in the system. If task_token is NULL 
or 0, the priority of the calling task itself 
is returned. 

Finally, the call rqsetpriorityCtask_ 
token, priorityJevei re tit m_code_ 
pointer /lets a task dynamically change 
its own or any other task's priority. Eve 
used it to set the main task’s priority to 
he lower than those of task! and task2 
so those tasks can run to completion 
without interference from the main pro¬ 
gram. 

The preemption time (sec Figure 
3) is the average time fora high-priority 
task to preempt a running low-priority 


Real-time 

Real-time 

Human-machine and/or 

computer 

+ application 

+ machine-machine = Real-time solution 

system 

code 

interface(s) 


Figure 1; Typical real-time control model 
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Figure 2: Task-switch lime 
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Preemption time = q ~ q 


Figure 3- Preemption time 
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DEVELOPMENT 

SYSTEMS 


INTROL-C Cross-Compilers 
INTROL-Modu!a-2 Cross-Compilers 
INTROL-Macro Cross-Assemblers 
Provide cost and time efficiency in 
development and debugging of em¬ 
bedded microprocessor systems 

All compiler systems include: 
Compiler • Cross-assembler • Support 
utilities • Runtime library, including 
multi-tasking executive ♦ Linker • One 
year maintenance • User's manual, etc. 

TARGETS SUPPORTED: 

6301/03 • 6801/03 • 6804 • 6805 • 6809 
♦ 68HC11 • 68000/08/10/12 • 32000/ 
32/81/82 • 68020/030/881/851 

AVAILABLE FOR FOLLOWING HOSTS: 
VAX & MicroVAX; Apollo; SUN; Hewlett- 
Packard; Gould PowerNode; Macintosh; 
IBM-PC. XT, AT and compatibles 


INTROL CROSS-DEVELOPMENT SYSTEMS 
are proven, accepted, and will save 
you time, money, effort with your devel¬ 
opment. All INTROL products are 
backed by full technical support. CALL 
or WRilE for foots NOW: 
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(contin ued fro m page 48) 
task. Preemption usually occurs when 
the high-priority task goes from a sus¬ 
pended or sleeping state to a ready 
state because either the high-priority 
task wakes up from a previously initi¬ 
ated sleep, or some event or signal that 
the task was wailing for is recognized. 
The first case will likely yield a lower 
preemption time on most systems, and 
that value is acceptable for the Rheal- 
stone benchmark. 

Listing Two (preempt.c) f page 100, 
measures preemption time in an iRMX 
II system, task! ( lower priority) merely 
sits in a delay loop, waiting to be 
preempted. tmk2 loops on an rqsleep 
call. Every time it calls rqsleep a (non- 
preemptive) switch to task) takes place. 
When one sleep period is over, task2 
wakes up and preempts taskh 

Interrupt latency (see Figure 4) is 
the average delay between the CPU's 
receipt of an interrupt request and the 
execution of the first application-spe¬ 
cific instruction in an interrupt-service 
routine. The time required to execute 
machine instructions that save the CPU's 
context (CPU's and coprocessor’s data 
registers, mode registers, and so on) 
are part of the interrupt latency. 

As just defined, interrupt latency re¬ 
flects only the delay introduced by the 
executive and the CPU itself. It does 
not include delays that occur on the 


Figure 4: Interrupt latency 


Figure 5: Semaphore-shuffle time 


system bus or electrical delays in con¬ 
trol circuitry external to the computer 
system because control circuitry is usu¬ 
ally specific to the application. 

Interrupt latency can be measured 
under iRMX II on a PC/AT-compatible 
computer using Itncy.c (Listing Three, 
page 100) and latch.asm (Listing Four, 
page 101). The benchmarking technique 
used here is different from the one I've 
used for the other Rhea Is tone compo¬ 
nents because interrupt latency is about 
an order of magnitude smaller than 
those components (under iRMX), hence 
the need for greater accuracy in meas¬ 
urement. The first difference is tEiat this 
benchmark involves a C and an assem¬ 
bler program. Secondly, the latency is 
measured by reading the 8254 timer 
chip directly (bypassing iRMX). Of 
course, this makes the benchmark hard- 
ware-dependent, which is the major 
disadvantage of this technique. 

The code in Itncy.c sets up a new 
interrupt vector (pointing to the assem¬ 
bler code in latch.asm) with the rqset- 
intermpti encoded_int_level, int_task_ 
flag T inthandler intjhandler_data_ 
seg, ret it m_code_ pointer ) call, reads 
the timer chip, and simulates a hard¬ 
ware interrupt with an INT(causeinter¬ 
rupt) instruction in software. The pro¬ 
cessor vectors to latch.asm, which saves 
context (by pushing CPU registers on 
the stack) and reads the timer again. 


Interrupt 

Handler 

Task 
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Note: CPU receives interrupt at timeT 

& = interrupt latency 
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The difference in the two timer count 
values is used to calculate interrupt 
latency in microseconds. 

The call rqresetinterntpH eneoded_ 
interrupt_level, return_code_pointer) 
merely restores the interrupt vector to 
its default value (before the rqsetinter- 
rupt call), 

Semaphore-shuffle time is the de¬ 
lay /overhead t within the executive, be¬ 
fore a task acquires a semaphore that 
is in the possession of another task 
when the acquisition request is made. 
Figure 5 illustrates what is being meas¬ 
ured. (ask2 requests a semaphore that 
task 1 ow ns.. Sema pho re-.s h u 111 e t i m e i s 
the delay within the executive (exclud¬ 
ing the run time of task! before it relin¬ 
quishes the semaphore) between lask2s 
request and its receipt of the semaphore. 

The objective here is to measure over¬ 
head when a semaphore is used to 
implement mutual exclusion. Many real¬ 
time applications involve multiple tasks 
needing access to the same resource. 
Semaphore-based mutual exclusion is 
a convenient way to ensure that the 
resource is not interrupted by a second 
task before it finishes an operation 
started by the first task. 

Listing Five (semshuf.c, page 101) 
shows a program that measures sema¬ 
phore-shuffle time, task! and ta$k2 are 


first executed a fixed number of times, 
without any semaphore-related calls. 
Then these tasks are executed again, 
the same number of times, with a sema- 

The Rhealstone 
benchmark identifies 
the execution times (or 
time delays) associated 
with six operations that 
are vital indicators of 
real-time multitasking 
system performance 


phore being shuffled between them at 
every iteration* The difference in exe¬ 
cution time with and without sema¬ 
phore shuffling is the overhead within 
the executive. This program uses the 
following three iRMX system calls asso¬ 
ciated with semaphores. 

The call sem_token = rqcreatesema- 


phore( initialjualue , max_value, queu- 
mg_methocl retum_code_pointer ) cre¬ 
ates a new counting semaphore, A count¬ 
ing semaphore can be incremented up 
to the maxjmlue parameter, lie cause 
this program sets max_value to 1, it is 
using a simple binary semaphore. The 
parameter cjueuing_method is set to 0 
for a FIFO queuing scheme when more 
than one task is waiting on the sema¬ 
phore; a value of 1 would make it a 
priority-based queue. 

The rqsendu nits( sem_token, units_ 
sent , return_code_ pointer ) call incre¬ 
ments the value of the semaphore. In 
this program, the calling task uses ir to 
relinquish the semaphore. 

Finally, the call rem&iningjunits = 
rqreceiveunits( sem_token f imits_ re¬ 
quested, max_wait_time, return_code_ 
pointer) decrements the value of the 
semaphore. The task makes this call to 
acquire the semaphore if available. The 
max_wait_time pa rameter specifies (in 
system clock ticks) the period it is w ill¬ 
ing to wait for the semaphore. A value 
of Oxffff means "wait forever,'" 

Deadlock-break time is the aver¬ 
age time to break a deadlock caused 
when a high-priority task preempts a 
low-priority task that is holding a re¬ 
source the high-priority task needs, 

Figure 6 illustrates how a deadlock 
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Introducing MultiScopey’an OS/2, multi- 
language, CodeVie w 71 '-com pa title debugger, 
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Even This Is More Confining Than Clipper. 

Just as the vast expanse of the American West gave its settlers a new perspective 
on opportunity, Clipper's open architecture lends unprecedented freedom to 
application development. 

Unlike fixed systems, Clipper never forces you to “make do". Its language is 
fully extensible with user-defined functions and new user-defined commands. 

You can extend the language with routines written in Clipper itself, or integrate code 
from other languages like C, Assembler, dBASE* 1 and Pascal. Odds are, you already 
have knowledge you can use with Clipper! 

But if a customizable language isn't enough, there's even more elbow room. 
Database and I/O drivers can be supplemented or replaced. Even Clipper’s linker 
knocks down barriers by allowing you to develop applications larger than available 
memory, without defining overlays! And when you’re done, Clipper’s compiler 
generates stand-alone, executable files for cost-free, unrestricted distribution. 

So, don't let the bounds of fixed systems fence you in. Unleash your imagination 
in the wide-open spaces of Clipper. To find out more, give us a call today. 

Clipper 5.0 

The Application Development Standard 

213/390-7923 
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RHEALSTONE 


(continued from page 51) 
situation occurs. Task 1 gains control 
of the resource and is preempted by 
medium-priority task 2. High-priority 
task 3 preempts task 2 and requests the 
resource from the executive at some 
point. Because task 1 still holds the 
resource, task 3 is now blocked. At this 
point, an unsophisticated executive 
would resume task 2. Task 2 knows 
nothing about the critical resource and 
may block higher-priority task 1 indefi¬ 
nitely (a deadlock situation'). A good 
real-time executive would not resume 
task 2 here (below the ? in Figure 6)* 
To avoid the deadlock, the executive 
might temporarily raise task I s priority 
to the same level as task 3’s, until it 
relinquishes the resource. In any case, 
the benchmark measures the delay be¬ 
tween task 3 T s request and its acquisi¬ 
tion of the resource, excluding task Ts 
run time before it relinquishes the re¬ 
source. 

The program deadbrk.c (Listing Six, 
page 102) measures deadlock-break 
time in iRMX II. The algorithm is simi¬ 
lar to the semaphore-shuffle bendimark* 
Three tasks of different priorities are 
executed a fixed number of times with¬ 
out competing for a critical resource. 
The same tasks are executed again, but 
this time task! and tasks both access 
the same resource, with a potential dead¬ 
lock situation occurring in each itera¬ 
tion. The difference in total execution 
time between the two cases is a meas¬ 
ure of the deadlock break time. 

Access to a critical resource is guarded 
by an iRMX object called a “region, 1 ' 
The region is created by the region_ 
taken = rqcreateregioni queuing^jnet- 
hod\ return_code_ [xrinter ) system call. 
The queuingjnethod parameter has the 
same function here as in the rqcreate- 
semaphorec all. Because only one task 
should access the critical resource at a 
time (mutually exclusive access), each 
task waits at the rqreceiveconfroK re¬ 
gion_ token , retum_code_pointer 2call 
until the region is free. The task must 
relinquish control with the rqsendcon- 
trol ( retum_code_pointer ) call when 
it has finished with the resource. 

Intertask message latency is the 
latency/delay within the executive when 
a nonzero-length data message is sent 
from one task to another (see Figure 
7). To best measure intertask message 
latency, the sending task should stop 
executing immediately after sending the 
message and the receiving task should 
be suspended while waiting for it. 

The message-passing mechanism 
must obey two important conditions; 
First, the intertask message-passing link 
must be established at run time. (Pass¬ 
ing data in a predefined memory area, 



A A ,, , , * T = task requests resource 

A i + A 2 = Deadlock break time . __ lask rBlinquishes reS0Ufce 

a - task preemption 


Figure 6; Deadlock-break time 
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C++ 
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Requires IBM PC-AT or compatible with 512K. plus 3S4K extended memory. 

Note: C++ is a translator and requires the use of Microsoft C 4.0 or later. 


Here is what you get: 

• The full AT&T v2.0 C++ translator with 
extended memory support. 

* Libraries for stream I/O and complex 
math* 

# C++ Primer, the definitive book on 
C++ version 2.0 by Stanley B. Lippman. 

• Sample programs written in C++. 

• Printed installation guide and 
documentation* 

* 30-day money-hack guarantee. 


NOW AVAILABLE FOR 
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To Order: 
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GUIDELINES SOFTWARE, INC* 
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residents add sales tax.) 
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Call or write for a free C++ information package* 
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RHEALSTONE 


such as a global variable, is not permit¬ 
ted.) Second, if multiple messages are 
sent on the same link, the sending task 
must not he allowed to overwrite an 
old message with a new one before the 
receiving task gets a chance to read it. 
Multitasking executives typically offer 
mechanisms such as pipes, queues, and 
stream files for intertask data commu¬ 
nications. 

The program il_msg,e (Listing Seven, 
page 104) measures message latency 
in iRMX IL Data messages are passed 
between tasks in an iRMX mailbox. 
The mailbox is created by the mail- 
box_token = rqcreatemailhox( i\pe_ 
flags, retum_ cod_ pointer ) system call. 
A task sends a data message to another 
task by calling rqsenddataf mail - 
box_token f message_ pointer ; mes- 
sage_length, return_code_ pointer ). 

The receiving task calls message^ 
length = rqreceivedatai mailboxJtoken, 
receive,*_ buffer, m ax_ wa ii_ t i m e w re - 
tum_code_ pointer) to receive the mes¬ 
sage, if available. If not, the task Ls 
made to wait until max_wait_time clock 
ticks have elapsed (if this parameter is 
OxfffF, the receiving task is willing to 
wail as long as is necessary). 

Note: This Rhealstone component is 
a modification of “datagram through¬ 
put, 1 ' which was proposed in the origi¬ 


nal article. The specification of inter- 
task message latency partly reflects 
reader input (see acknowledgment IT 

Computing a Rhealstone Performance 
Number 

Measurement of all six Rhealstone com¬ 
ponents yields a set of time values (in 
the tens of microseconds to millisec¬ 
onds range, for most PCs), Although 
the individual measurements are of sig¬ 
nificance by themselves, it is useful to 
combine them into a single real-time 
figure of merit, so overall comparisons 
between real-time computers can be 
made. To get a single Rhealstone per¬ 
formance number, the following com¬ 
putational steps are necessary: 

1. All Rhealstone component time val¬ 
ues should he expressed in the same 
unit (seconds). 

2. The arithmetic mean of the compo¬ 
nents must be computed, 

3. The mean (from step 2) must be 
arithmetically inverted to obtain a 
consolidated real-time figure of merit, 
i n Rhc a Is tones/second ♦ 

Given the following set of measured 
values: 

task-switch time = tl seconds 
preemption time = t2 seconds 
interrupt latency = t3 seconds 


semaphore-shuffle time = t4 seconds 
deadlock-break time = t5 seconds 
intertask message latency = 16 seconds 

the arithmetic average of the Rheal¬ 
stone components is: 

f = (tl + t2 .+ t3.+ t6) / 6 

and the system's consolidated real- 
time performance number is: 

1/t 1 Rhea 1st ones/second 

Application-Specific Rhealstones 

The operational definition of Rheal¬ 
stones, in the previous section, is ge¬ 
neric for any application that may be 
executed on a real-time computer. It 
treats all the Rhealstone components 
as equally important parameters of real¬ 
time performance. Generic benchmarks 
are useful when evaluating real-time 
system performance without a particu¬ 
lar application in mind. 

When a real-time computer is “dedi¬ 
cated" to a type of application, the 
Rhealstone figure can he computed in 
a way l hat is appropriate to it. This 
performance figure is called an “appli¬ 
cation-specific Rhealstone.” It gives un¬ 
equal weight to different Rhealstone 
components because the application’s 
performance is not influenced by all 




on NEW PLATFORMS 


VAX/VMS 
HP 9000/300 
XEN1X/366 
Motorola UNIX V2 
Sun-3 
NCR Tower 


Motorola UNIX V,3 
VAX/VMS iULTRIX 
Sun-3,3861 
XENIX/366 


XENIX/386 
Sun-3 
VAX/VMS 


OREGON C++ 

■ A true compiler - not a translator 
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of them equally. For example, the ap¬ 
plication may be heavily interrupt- 
driven, and the software may not use 
semaphores at all The application’s 
designer can compute the application- 
specific number if he/she knows (or 
can estimate) the relative frequency of 
different Rhealstone components in the 
application. 

The steps for computing application- 
specific Rhea I stones are as follows: 

1. Measure the individual components 
(tl to t6) as before. 

2. Estimate the relative frequency of 
each Rhealstone component’s occur¬ 
rence when the application is executed, 
and assign nonnegative real coefficients 
(nl to n6) proportional to the frequen¬ 
cies. For example, if interrupts occur 
five times more often than task switches 
do, and semaphores and intertask com¬ 
munication are not used in the applica¬ 
tion code, the value of n3 should be 
three times the value of nl, and n4 and 
n6 should be set to 0. 

3. Compute a weighted average of the 
Rhealstone components: 

r = (nrtl + n2*t2 + n3*t3 + ....+ 
n6*t6) / (nl + n2 + n3 ... + n6) 

4. Invert the average to get the re¬ 


sult 1/t’ application-specific Rheal- 
stones/ second, 

The procedure for computing generic 
and application-specific Rhealstones out¬ 
lined in this article is different from 
that specified in the original proposal. 
The original procedure specified that 
each Rhealstone component should be 
arithmetically inverted separately and 
the average taken thereafter. 1 am grate¬ 
ful to the many readers who wrote to 
point out that, with the previous proce¬ 
dure, a computer system with high per¬ 
formance in one or two components 
and bad performance in the others 
would outshine one with moderately 
good performance in all categories. 

The revised algorithm specifies that 
the components be averaged first and 
then arithmetically inverted (see acknowl¬ 
edgment 2). This algorithm ensures that 
if a real-time system shows bad perfor¬ 
mance in even one category, its overall 
score will suffer badly. This is intentional, 
because to guarantee quick response lime, 
moderately good performance is needed 
in ail Rhealstone categories. In other 
words, a real-time system that takes sev¬ 
eral seconds to respond to an interrupt 
will have a kw Rhealstone rating, even 
if it delivers microsecond-range perfor¬ 
mance when switching context or ex¬ 
changing semaphores. 


Acknowledgment 

1. Robert Wilson, GE Huntsville, Ala¬ 
bama, and Ketan Sampat, Intel 
Hillsboro, Oregon, for their input on 
measurement of inter-task communica¬ 
tion performa nee. 

2. Marco Pellegrino, Siemens AG Mu¬ 
nich, Federal Republic of Germany, for 
suggestions on computation of Rheal¬ 
stone performance number. 

Availability 

All source code is available on a single 
disk and online. To order the disk, 
send $14.95 (Calif residents add sales 
tax) to Dr. Dobb'sJournal, 501 Galves¬ 
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Source code is also available online 
through the DDJ Forum on Compu¬ 
Serve (type GO DDJ). The DDJ Listing 
Service (603-882-1599) supports 300/ 
1200/2400 baud, 8-data bits, no parity, 
1-stop bit. Press SPACEBAR when the 
system answers, type: listings (lower¬ 
case) at the log-in prompt. 
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Bounding Box 
Data Compression 

An optimized font data compression method for 
fast screen II0 environments 


Glenn Searfoss 


T he optimal data compression 
method for a given situation is 
determined by the type of data 
to he used and its intended ap¬ 
plication, To date, a variety of 
methods have been used to effect a 
balance between compression and dis¬ 
play speed of bit-mapped font data. 

One school of thought maintains that 
only noneompressed font data be used. 
While this data can be displayed rap¬ 
idly, the amount oF data storage re¬ 
quired for fonts can be prohibitive, par¬ 
ticularly when used with higher dis¬ 
play resolutions and colors. 

Another school stresses maximum 
compression of font data at all times. 
In this situation, each time a character 
is accessed, the cell data must \xz re¬ 
constituted, This saves data storage 
space but sacrifices access speed dur¬ 
ing screen display, 

A third approach attempts to incor¬ 
porate both aspects. Here font data 
remains compressed until accessed, at 
which point all data is uncompressed, 
A font may then be used at optimal 
speed. As additional fonts are uncom¬ 
pressed, the data storage limitation of 
the first method is encountered. This 
limitation can be ameliorated by each 
caching system in which only the most 
recently used characters are available 
in uncompressed form (at the expense 
of additional code complexity). 

Because none of these methods are 
completely satisfactory for font screen 
display, it is important to develop a 


Glenn works at Data Transforms Inc., 
and can he reached at 616 Washing¬ 
ton Street, Denver, CO 80203 


better balance between efficient access 
a nd e ffic ie n t stc) ra ge. 

The terms ‘fast-access’ 1 or “on-the- 
fly 1 " have been used to describe bit¬ 
mapped font data optimized for fast 
screen I/O. It is ultimately desirable in 
this environment to achieve maximum 
d a t a comp ress k >n w 1 1 i I e maintaining or 
increasing data access speed. To this 
end, it is essential to understand cer¬ 
tain restrictions inherent with the graph¬ 
ics display of bit-mapped font data. 
First, there must lie minimal calcula¬ 
tion of font data. Vector format and 
highly compressed bit-mapped fonts 
both require recalculation of character 
data at display time. This greatly re¬ 
stricts their usefulness in a fast-access 
environment. Speed optimization oc¬ 
curs when there is little or no data 
compression and reconstruction. 
Second, character size must relate 
to the display resolution. As screen dis¬ 
play resolution increases, larger char¬ 
acters are required to maintain the same 
relative size and quality as characters 
used on lower-resolution displays. 

Third, font data storage requirements 
must not impinge upon code space. 
As bit-mapped fonts increase in size, 
their data storage needs quickly reach 
mammoth proportions. Realistically, 
some form of data compression is re¬ 
quired for a program and several large 
font sets to coexist in memory. 

Fourth, the amount of code neces¬ 
sary must be functional, effective, and 
preferably compact. Coding require¬ 
ments are reduced with minimal data 
compression and decompression. 

The data compression method best 
suited for this application will achieve 


a dynamic balance between these four 
criteria. The Bounding Box method of 
data compression is such a method. 

To illustrate its effectiveness in [his 
situation, a comparison with a com¬ 
monly used method of data compres¬ 
sion, run length bit encoding (RLE), is 
useful. This comparison is useful even 
though the two approaches are not 
mutually exclusive: One can store run 
length encoded characters in the Bound¬ 
ing Box format, 

A valid comparison depends upon 
establishing a common reference point. 
Because noneompressed data is the ba¬ 
sic requirement for both compression 
schemes, a brief outline of this font 
data format may be useful. 

Noneompressed fonts are used as is. 
The font data is comprised of header 
information and complete character cell 
data. The header may detail as many 
character formatting aspects as desired. 

A typical header for standard non- 
compressed font data is shown in Listing 
One, page 108, In this case, Fm using 
the C language data structure of Data 
Transforms 7 Fontrix (Font!) Format. 

Each font has a header that defines 
the font and points to the character 
bitmaps. Immediately following the font 
header is the character bitmap data. 
Character bitmaps are stored as scan- 
rects in scan line order from top to bot¬ 
tom. Each scanline is stored byte wise 
left to right, left justified, and rounded 
to byte length. Each byte is stored 8 
bits per byte where MSB is the leftmost 
pixel. Using this as a standard font 
header to describe Figure 1 T we can 
proceed to specifics concerning meth¬ 
ods of compressing this data. 
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The new DigiCHANNEL series 
outperforms all other leading 
multi-user communications boards. 


Raw Input (19.2 KB & 3S.4 KB Processing) 



Raw Input: Primarily data received via hostto-host 
communications. The higher the better 



Raw Output: Processed data from host applications to terminal 
users (spreadsheet word processing, etc:) 7he higher the better 


Vo Host Utilization per Kilobyte/Second 




Raw Input 


Haw Output 


Anvil 


Processor Overhead: Percentage of host CPU time utilized for 
I/O processing tasks. The lower the better. 


The new DigiCHANNEL 
I series of multi-user commu¬ 
nications boards sets the new performance standard for 
terminal response time, especially under heavy user-load 
conditions. The key to this performance is the synergy 
between our hardware and our new Front End Processing 
real-time Operating System (FEP O/S 5.4) software. 

The proof is in the numbers, and a good example 
is the DigiCHANNEL PC/16i. In benchmark tests, it beats 
every other leading board in the two critical areas that 
determine board performance: data throughput and 
processor overhead. 

Data throughput is calculated by measuring the 
total amount of data that a board can handle per port 
and per system. The higher the data throughput, the 
faster the response time for each user on the system. 

Processor overhead is the amount of additional 


processing imposed on the CPU to handle the data 
input/output being controlled by the communications 
board, hie less time the CPU needs to spend on I/O 
chores, the more time it can spend processing 
applications for terminal users. 

Call for our FREE technical white paper with all 
the details on our benchmark testing. While you’re at it, 
ask for our FREE booklet, How to Do Multi-User Right. 

No matter how simple or complex your 
multi-user systems, you can trust DigiBoard 
to put you at the head of the pack. And 
keep you there. * 


Digits 

Plugging you 11 

6751 Oxford Street • 

1 - 800 - 344-4273 • 


St. Louis Park, MN 55426 
In Minnesota (612) 922-8055 
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Create ultra compact 
and fast TSRs with 
I full DOS access! 

CodeRunneR provides the most 
powerful tools available for creating 
feature-packed, tiny TSRs with 
Turbo C' 5 and Microsoft C®. 

Now, on the heels of CodeRunneR's 
huge success, we are announcing 
our Professional Developers Kit 
series - PDK#1 and PDK#2. 

CodeRunneR Features 

• Function Level Granular 

• Auto recovery of Initialization 
Code and Data 

• Create MultiTasking programs 

• Scheduler supports > 10,000 events 

■ Access TSRs via up to 256 hot-keys 
or interrupts 

• BCD Floating Point Library 

■ Source for TSRs: Help, Programmers 
Calculator, Business Calculator, ASCII/ 
Color, Date/Alarm & Trap/Debug 

CodeRunneR $149.00 


Call our BBS for FREE sample 
TSRs, benchmarks & support. See 
for yourself how powerful and 
tiny CodeRunneR TSRs can be. 
BBS: (508) 875-8009 


PDK#1 Features 

• Serial Communications Library, 
including background file transfers 

• LIM Support for Code and Data 

• Print SPOOLer functions 

• Program Registration functions 

• Free copy of HyperCGM (w/ source) 

PDK#2 Features 

• High speed floating point library 

• 6x Borland and 2x ALTMATH 

PDK#1&2 $99.00 each 


CodeRunneR is great for non-TSR 
programming too. Excellent for 
creating MultiTasking programs! 

NO ROYALTIES, MONEY BACK 
offer and source code available. 
Order today by Phone, FAX or 
BBS. MasterCard & VISA accepted. 

.fMicrosystems Software, Inc.™ 

600 Worcester Road 
Framingham, MA 01701 
Phone; (508) 626-8511 
FAX: (508) 626-8515 

CodeRunneR is a TM Ol tofoosysl&ms Software, Turbo C is a TM gl 
Borland IrdernatioraJ and Microsoft Is a TM of Microsoft Corporalian 
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BOUNDING B 


(continued from page 56) 

Bounding Box Compression 

The Bounding Box Compression 
Method (see Figure 2) involves outlin¬ 
ing a cell's “bit-on” character data with 
the smallest box possible. Coordinates 
that position the "box” relative to the 
original character cell are saved in the 
font header. This compression method 
is automatic within the Data Transforms 
Font Editor when a font over 32 x 32 
pixels in size is saved. A sample header 
for a font compressed using the Bound¬ 
ing Box method is shown in Listing 
Two, page 108 (again using Data Trans¬ 
forms’ Fontrix [Font2] Format), 

The data listed in the struct fonl2 
portion of the (Font2) font structure 
above is defined as follows: 

• The font header is the same as de- 
s c ribed in the stm cf fa ni I head t if t h e 
noncompressed font data format; font 
cell segments are an array of segment 
pointers Lo characters kept as offsets 
from the Ix-ginning of the font file. For 
example, if an array value for a charac¬ 
ter = 10 1 then the starting address of a 
character's ‘ bounding box" data = (the 
start of File address + size of 1st met 
font2j) + ( lOx 16), where 1 segment “ 
16 bytes. 

• The horizontal size is the actual width 
in bits of the bounding box. 

• The horizontal offset is the distance 
in bits from the left edge of the cell to 
the upper lefthand comer of the bound¬ 
ing box. 

• Horizontal bytes refers to the actual 
size in bytes of the interior of the bound¬ 
ing box. 

• The vertical size is the actual height 
in bits of the bounding box, 

• The vertical offset is the distance in 
bits from the top edge of the cell to the 
upper edge of the bounding box. 

The character data is never com¬ 
pressed; rather, the empty space out¬ 
side the “bounding box” is discarded. 
The analogy of a shrinkwrap bag can 
be used to illustrate. 

Imagine a character cell placed within 
a shrink-to-fit bag. The noncom pressed 
cell is the unshrunk bag. Now shrink 
the bag until all edges contact the outer 
limits of bit-on data, forming a rectan¬ 
gular bounding box. For some charac¬ 
ters — such as a lowercase “i” — this 
correlates to a major amount of shrink¬ 
age, and the shrinkage correlates to 
saved data space, hence, compression. 
An uppercase hl W” may fill most of a 
cell. In this instance minimal shrinkage 
will occur, with little or no saved data 
space. However, the overall net sav¬ 
ings in data space for an entire font set 
will he great because few characters Fill 
an entire cell (see Figures 2, 3, and 4). 


DX METHOD 



Figure 1: A non compressed character 
cell. A. . Vertical cell size 16pixels. R 
Horizon tal cell size 17 pixels. C Baseline 
character cell 12 pixels 



Figure 2: A character cell compressed 
using the Bounding Box method. 7 he 
data listed is saved for each character 
when the font was created and stored 
in a look-up table in the font header 
A . Horizontal offset 6pixels. R Vertical 
offset 4 pixels. G Vertical size ofbou rid¬ 
ing box 8pixels\ O. Horizontal size of 
hou n dit ig box 2 p ixels 



Figure 3- Noncom pressed character 
cell. Vertical cel! size 16pixels. 
Horizontal cell size 17pixels. Baseline 
character cell 12 pixels 



Figure 4: Actual data saved when a 
character celt is compressed using the 
Bounding Box method 
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Is this your only route to 
mainframe information? 



Escape to Autoware: NOW! 


When you need mainframe access, why 
endure a frustrating labyrinth of screens? 
Especially when Attachmate software delivers 
simple single-menu access. 

It frees you to select E-mail, transfer files 
and retrieve data with single-keystroke ease. It’s 
so automated, we call it Autoware. So fast, 


we had to call it NOW I 

NOW! lets you customize menus for 
specific procedures or applications, such as 



unattended file transfer. Within minutes, even 
non-programmers can automate most repetitive 
mainframe chores. 

Make mainframe access a direct path, not 
a mindless maze. Let Autoware do the work/or 
you—NOW! Call for your free demo disk: 

800426 * 6283 , 


Attachmate Corporation; 13231 S.E, 36th Street Bellevue, WA 98006 (.206)644-4010 

NOW! and Autawarc att cisdeinadta of AnaLhiflaie Corporation 

CIRCLE NO. 188 ON READER SERVICE CARD 






















BOUNDING BOX ME!HOD 


(continued from page 58) 

Run Length Bit Encoding 

A RLE font would possess a header 
similar to the font header described in 
the “struct font 1 head" of the noncoim¬ 
pressed font data format. The main dif¬ 
ferences between RLE and the Bound¬ 
ing Box lies in the method of character 
data storage and how code points to it. 

In a simple case of run length bit 
encoding, bit mapped data is com¬ 
pressed by reading each scanline of a 
character cell, grouping adjacent bit- 
on or bit-off data and saving the infor¬ 
mation as pairs of ASCII digits. For 
example, by using RLE the marked scan¬ 
line in Figure 5 could be compressed 
as follows: 

• 0x06 (6 identical bits in a row), 0x00 
(those bits are bit-off data) 

• 0x02 (2 identical bits in a row), 0x01 
(those bits are bit-on data) 

• 0x09 (9 identical bits in a row), 0x00 
(those bits are bit-off data) 

Having established the basic structure 
of the two methods, it now remains to 
compare their differences in access 
speed, compression efficiency, and cod¬ 
ing req 11 i rente nLs, 

Speed of Compressed Data Access 

When a Bounding Box compressed char¬ 
acter is used, there is no run-time pen¬ 
alty during screen display. A character 
cell is not reconstituted. Rather, the 
character data is used as is and posi¬ 
tioned relative to the original cell size 
information. 

Fonts compressed with run length 
bit encoding pay a run-time penalty 


during screen display. If a font remains 
compressed while being accessed, each 
time a character is displayed to the 
screen, the entire character cell must 



Figure *>: Run length bit encoding for 
scan tine Y. Each portion of data is 
compressed into a pair of ASCII digits. 
A 0x06 0x00K 0x02 0x01 C 0x09 
0x00 



Figure 6: Run length hit encoding for 
scan line A'. Each portion of data 
is compressed into a pair of ASCII dig¬ 
its. 7he more data dispersal on a 
scan line, the more detailed this method 
of compression becomes. A 0x04 
0x00 R 0x03 0x0fC. 0x03 0x00 
a 0x03 0x01 E. 0x04 0x00 


be reconstructed. In a case like this, 
you’ll be watching the clock. 

Compression Efficiency 

The Bounding Box routine can run at 
up to 90 percent of the overall com¬ 
pression efficiency of more computa¬ 
tionally expensive compression algo¬ 
rithms. The actual character bits-on data 
is never Compressed. 

For this reason, the Bounding Box 
approach is more properly called a tech¬ 
nique or a character storage format, 
rather than an algorithm. Information 
regarding the bounding box (size, [x,yl 
position within the original cell, and 
so on) is kept for each character in a 
lookup table in the font header (see 
Figures 2 and 4). 

Using this compression method on 
the character cell in Figure 1 (lower¬ 
case i), the net gain in savings is 94 
percent of the original character cell 
size. For Figure 3 (uppercase W), the 
net savings is 31 percent of the original 
character cell size. The percentage in 
savings correlates to the discarded zero 
(hit off) data outside the bounding box 
(see Figure 4). 

The run length bit encoding (simple 
case) compression method can run at 
up to 98 percent of overall compres¬ 
sion efficiency, but will be computa¬ 
tionally expensive. 1 Is mg this compres¬ 
sion method on the character cell in 
Figure 1 (lowercase i), the net gain in 
savings is 7H percent of the original 
character cell size. For Figure 3 (upper¬ 
case W), the net savings is 57 percent 
of the original character cell size (see 
Figures 5 and 6). Table 1 provides a 
complete RLE table for Figure 5. Read 


World Class Software Security Hi 



Secure software and data with reliable, effective 
protection products that won’t burden honest users. 

Gtenco is a world leader in the area of software security products and 
services. Our copy protection products and data security products are second 
to none. They are designed to function on a wide variety of third party 
hardware. We have over 3500 satisfied software firms utilizing our products. 
We also have a full line of disk based protection systems. 


The parallel port interface (PPI) connects between the printer port on a PC and the 
printer cable. The PPI holds two Key Tags, one on each side. Each Key Tag contains 
a secure custom chip which is pre-programmed by Glcneo to only work with the 
assigned software package. A second Key Tag can be employed lo protect another 
package, or may be used to mm other software packages “on", remotely or on-site, 

* STANDARD KEY TAG - Software is 
protected for an unlimited number of 
executions They arc pre-programmed to 
include a sequentially aligned S/N. 

• COUPON KEY TAG ■ Software is valid for 
a preset number of executions. The Coupon 
count can be reset remotely or on ibe cust¬ 
omers site by using a second update Key Tag. 


* MACHINES SUPPORTED ■ IBM 
PC/XT/AT & PS/2, Macintosh 

* OPERATING SYSTEMS - MS-DOS, 
XENIX. Network, Kinder, & Mulliflndcr 


Call or write for more information. 


* LANGUAGES/COMPILER - Over 50, 
including runtime packages, data bases and 
spread sheets. Wc have a non-programmer 
interlace as well. 


- READ/WRITE KEY TAG - With 
programmable memory Perfect for companies 
which have multiple products or a product with 
several optional modules. By having several 
packages protected using one Key Tag. your 
costs are lowered. 

* DURATION KEY TAG - Has a clock on 
board. {Available late ’89) 


GLENCO 



ENGINEERING INC. 

SfflWNG the SOFTWARE INDUSTRY SINCE 1979 
721 W, Algonquin Road. Arlington Hts., IL 60005, (312) 364-7638, FAX 364-7696 

In Europe contact: SDC Security Systems, The Netherlands 
Tel: +31-45-441536, FAX: +31-45-444747 
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Introducing the 
24 hour, 7 day 
workweek. 


Automator, the software “robot” 
that never sleeps. 

In today’s competitive global economy, optimizing 
the productivity of your corporate-wide information 
system has become critical. 

The flow of information between your main¬ 
frame and workstations should be serving you at 
full capacity, around-the-clock, freeing managers 
for more creative pursuits. 

Automator was developed to simplify the 
process of linking PC workstations into any infor¬ 
mation network, it is a complete software system 
for creating and ninning unattended operations 
which drive the PC workstation, using pre-pro¬ 
grammed instructions as if the operator was 
actually there. 

Automator can faithfully perform all those 
day-to-day tasks that must be done—like down¬ 
loading files for distribution on E-mail; automating 
month-end procedures; searching and capturing 
mainframe data for use in a PC application; constant 
monitoring of the computer network-and 101 
other uses. 


Universal, Productive, Efficient 

Automator software makes emulation specific 
APIs redundant, because it can work concurrently 
with most DOS applications, LANs and terminal 
emulations, including 3270, 5250 and VT 220, 

The software’s Program Generator rapidly pro¬ 
duces applications, by simply watching a PC's screen, 
keyboard and clock. And with its high level pro¬ 
gramming language, can give developers the 
flexibility to build sophisticated applications that 
can be tested in a matter of hours. 

And even though Automator has the capacity 
to perform multiple operations, its unique technology 
keeps DOS memory' requirements 
down to a minimum of only 32K. 

For more information about 
Automator, call Mark Gillett or 
Harold Lund at 212-475-2747 
or 800-992-9979. 

AUTOMATOR 



From Direct Tfechnology 


10 East 2tsi Si reel. New York, ny 10010 
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We Sell Know-How 



PC System Programming tor Developers is an 

encyclopedia of PC technical and pragamming Knowledge. 
Features parallel working examples written in Pascal, C. 
assembly and BASIC, Explains memory layout, DOS 
operations, using extended, expanded memory, writing 
device drivers, hard disks, PC ports, mouse drivers, 
fundamentals of BIOS, graphics and sound, TSR 
programs, complete append lees. 920+ pp w/2 disks, over 
l meg of programs in compressed format. 

ISBN 1 -55755-036-0. 920+ pages wilh 2 disks, $59 95 


PC File Formats and Conversions is lor every PC 
user who ever wanted to know how lo exchange file 
formats. Describes in detail file formats for major 
software applications. Use IMPORT/EXPORT 
functions in many applications, Includes conversion 
program Companion disk included. 

ISBN 1 -55755-059-X. 280 pages $34.95 




MS-DOS Tips & Tricks shows you how to become 
more productive quickly with DOS. 

Contains dozens of hints and tips from DOS experts. 
Learn how lo find any file on hard disk, quickly and 
painlessly; howto copy data from a backup without 
the RESTORE command; learn to protect your 
data and PC from unauthorized access; how to 
cold-siart your PC from a batch tile and much 
more 

tS BN 1 -55755-078-6.310 pages. $17.95 

Companion disk available: 514.95 


Tips & Tricks tor your PC Printer is subtitled 
"understanding and using your PC printer more eflectrvely". 
Takes the hassle out of working with PC printers. You'll 
learn how lo seiu P and co n necl you r prime r You' II learn to 
use the many leatures that are bwft into the popular 
printers, but rarely used because they're so difficult to 
understand. The companion disk has several practical 
printer utilities; online printer HELP, printer control aid, 
printer font editor and more. 

400 page book includes companion disk. 

ISBN. 1-55755-075-1. Suggested retail price 1 $34,95 


PC TOOLS Complete The total reference guide to Ihe 
best-selling PC TOOLS Deluxe soil ware. Shows you how 
to master all of the utilities and applications, many 
techniques, hints and tips Learn advanced leatures that 
wilt make your computing sesicns easier and fasler. Covers 
Version 5.5 of PC TOOLS Deluxe. 

ISBN 1 55755-076-X 450 pages $22.95 


PC TOOLS Companion Quick Reference A durable 
hardcover guide filled with alI of the essentials tor using PC 
TOOLS Deluxe Version 5.5 more effectively. Contains the 
correct syniex organized logically lor you to quickly and 
easily get your fob done 

ISBN 1 -55755-012-3. Hardcover. 220 pages. $12.95 




Him 


Coming in April Turbo Pascal Internals for Developers. 

Available at B Dalton Booksellers, Waldens, and Software Etc, nationwide. In the UK contact 
Computer Bookshops 021-706-1188. In Canada oonlacl Addison Wesley 416-447-5101, 


In US and Canada call TOLL FREE: 1-800-451-4319 


Abacus 



imimmi 

mm 


Dept. D4, 5370 52nd Street SE * Grand Rapids, Ml 49512 
Phone: (616) 698-0330 * Fax: (616) 698-0325 

In US and Canada add $4.00 postage & handling. Foreign orders add $12.00 postage por book. 

We accept Visa, Master Card or American Express. Call or write lor your free catalog of more PC books. 
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(continued from page 60) 
each scan line left to right, top to bot¬ 
tom, numbered 0 to 15, Table 2 is the 
complete RLE table for Figure 6. Again, 
read each scan line left Lo right, top to 
bottom, 0 to 15- 

Coding Requirements 

The Bounding Box met tied is invoked 
at a time when display speed is not an 
issue — during font creation. All the 
data needed to use a character is saved 
in a lookup table in the font header at 
this time. Because die actual data within 
the bounding box is not compressed, 
no coding is required to reconstruct a 


0] 0x17 0x00 

1] 0x17 0x00 

2] Oxl 7 0x00 
31 0x17 0x00 

4] 0x06 0x00 0x03 0x01 0x09 0X00 

5] 0x17 0x00 

6j 0X06 0x00 0x03 0x01 0x09 0x00 
7] 0x06 0x00 0x02 0x01 0x09 0x00 
0j 0x06 0x00 0x02 0x01 0x09 0x00 
9j 0x06 0x00 0x02 0x01 0x09 0x00 

10] 0x060x000x020x01 0x090x00 

11] 0X170X00 

12] 0x17 0x00 

13] 0x170x00 

14] 0x170x00 

15] 0x170x00 


Table 1: RLE table for Figure 5. Read¬ 
ing each scan line left to right , top to 
bottom, and numbered 0- 15 


character cell. Code need only index 
into the data and index the screen pixel 
position. 

Run length bit encoding requires code 
to do more than access font data. It 
must also handle the peculiarities in¬ 
volved with compressing and uncom¬ 
pressing data. Font characters that re¬ 
main compressed while being used 
must be reconstructed each time they 
are accessed. Font data that is reconsti¬ 
tuted once and thereafter accessed as 
noncompressed data, can instigate a 
data storage conflict. As additional fonts 
are uncompressed, their combined data 
storage requirements begin to compete 


with code and operational program 
space. 

The Nitty Gritty 

The Bounding Box method is most ef¬ 
fective when the data to be compressed 
is bit-mapped data; all bit-on data is 
concentrated and confined in one area, 
as is often the case with alphanumeric 
character fonts; the ratio of bit-off to 
bit-on data is high; fast usage of com¬ 
pressed data is of most importance (for 
example, screen I/O, graphics print¬ 
ing, and so on); and it is preferred that 
font data remain compressed when be¬ 
ing accessed. 


030x17 0x00 

1 ] 0x02 0x01 0*13 0x00 0x02 0x01 

2] 0x03 OxOI 0x13 0x00 0x03 0x01 

3] 0x01 0x00 0x02 0x01 0x13 0x00 0x02 0x01 0x01 0x00 

4} 0x0T 0x00 0x02 0x01 0x13 0x00 0x02 0x01 0x01 0x00 

5] 0x02 0x00 0x02 0x01 0x13 0x00 0x02 0x01 0x02 0x00 

6] 0x02 0x00 0x02 0x01 0x04 0x00 0x01 0x01 0x04 0x00 0x02 0x01 0x02 0x00 

7] 0x03 0x00 0x03 OxOI 0x03 0x00 0x03 0x01 0x02 OxOO 0x02 0x01 0x03 0x00 

8] 0x03 0x00 0x02 0x01 0x01 0x00 0x02 0x01 0x01 0x00 0x02 0x01 0x01 0x00 0x02 0x01 0x03 0x00 

9] 0x04 0x00 0x03 OxOI 0x03 0x00 0x03 0x01 0x03 0x00 

10] 0x04 0x00 0x03 OxOI 0x03 0x00 0c03 0x01 0x04 OxOO 

11] 0x05 0x00 0x01 0x01 0x05 0x00 0x01 0x01 0x05 0x00 

12] 0x17 0x00 

13] 0x17 0x00 

14] 0x17 0x00 

15] 0x170x00 


Table 2: RLE table for Figure 6. Reading each scan line left to right t top to 
bottom r and numbered O- 15 
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Give your programs 

SOME ROOM FOR IMPROVEMENT 


D evelopers today need all the 
room they can get. But 
within the confines of 640K, 
space can be hard to come by. 
Even something as essential as 
your make utility can become a 
hindrance due to its large mem¬ 
ory requirements * If you're tired 
of running into the 640K wall, 
you need Dr. Switch ™-the 
incredible memory management 
utility that allows you to push 
stand-alone and RAM resident 
programs out of the way while 
you compile, link, and test even 
the largest programs* 

Let nothing stand in 
your way. 

With Dr. Switch you can swap 
the RAM resident programs you 
rely on, to and from expanded 
memory, extended memory or 
hard disk so that you can get on 
with the business at hand. The 
Doctor works lightning-fast on 
everything from on-line help 
systems like the Norton Guides® 
and Peabody® to desktop util¬ 
ities such as Sidekick®, Lotus 
Metro®, and PC Tbols®-not to 
mention terminal emulators like 
DCA’s e78 and IBM's PC Sup¬ 
port program. 

Make less of Make. 

Dr* Switch reduces the overhead 
of Microsoft Make and Poly- 
tron’s PolyMake from over 1QGK 
to a mere 4K, giving you the 
memory you need to run your 
compiler and linker more 


efficiently. So go ahead, swap 
your Make utility out of memory 
while you compile and link-Dr. 
Switch swaps it back, in a flash, 
when youTe done! 

Turn your editor into 
an integrated 
environment. 

You read right* With Dr. Switch, 
you’ll be able to compile and 
link directly from your editor 
And you can feel secure about it 
too! If you run your program and 
it crashes, the Doctor will return 
you right to the program that you 
started from. 

You’ll hardly know 
it’s there. 

Unlike other programs that claim 
to give you extra memory, but 
actually take up large blocks of 
it themselves, Dr. Switch always 
keeps a low profile. It requires 
less than 4K and can take full 
advantage of any expanded or 
extended memory you have 
available. It’s completely trans¬ 
parent, requires no setup, and is 
network aware. Like any good 
doctor, it can be called on at any¬ 
time from anywhere* 

Don’t just take our 
word for it. 

Dr. Switch is the people’s choice: 
“Can’t break the 640k barrier, 
work around it with Dr* Switch. ” 
PC Magazine , March 28,1989 
Winner of the 1989 Data Based 
Advisor Readers Choice Award 
for Best Database Utility. 


Attention Dbase 
developers 

Our special Dbase DeveloperPak 
includes all the required royalty- 
free runtime modules, so that 
you can include the Dr. Switch 
technology along with the appli¬ 
cations you distribute. 

With the Doctor on call, 
you’re in control. 

When you’ve got RAM resident 
programs to swap or large appli¬ 
cations to run, remember-there’s 
nothing like having a doctor in 
the house. 

The Doctor is in. 

CALLAND PLACE 
YOUR ORDER TODAY! 
212-787-6633 

DR. SWITCH 

$ 59 . 95 * 

DBASE 

DEVELOPERPAK 

$99.95* f 

B Black & White International Inc. 

P.Q Bdk 1040 
Planetarium Station 
New Yotk, NY 10024-1040 

Dr. Switch i3£ Irademkrkttf White internadunat, Inc Altuibers are 

trademarks or rep i sin red! trademarks of (heir respective botdera. 

‘Plus Shipping/Handling: TJ,S. orders add $6.DO. Canadian and Foreign wden 
add SlS HO. COD add $3.50. NY residents hUhIhIix. All payments U.Sk 
funcfcvU.S. Banks only f 

' Includes ray ally-fret ruin mu version 


CIRCLE NO. 407 ON READER SERVICE CARD 




BOUNDING BOX METHOD 


(continuedfrom f>age 62) 

Run length bit encoding is most ef¬ 
fective when all bit-on data is widely 
dispersed or present at a majority of 
the cell edges; the ratio of bit-off to 
bit-on data is low; and the usage of 
data storage must be maximized or is 
of higher priority. 

RLE and the Bounding Box are two 
good methods of data compression, 
Each has limits in its ability to handle 
graphics information. The decision to 
use a RLE or Bounding Box compres¬ 
sion scheme should lx* based on the 
likely distribution of bit-on data and 
the preferred ratio of data compression 
to access speed. 


As mentioned earlier, in situations 
where memory is extremely tight, the 
Bounding Box method can profitably 
be used in conjunction with RLE or 
other algorithms. Of the various com¬ 
pression methods currently used in fast- 
access screen I/O environments, the 
Bounding Box method is recommended 
for maintaining maximum data com¬ 
pression while allowing the greatest 
access speed of bit-mapped font data. 

Availability 

All source code is available on a single 
disk and online. To order the disk* 
send $14.95 (Calif, residents add sales 
tax) to Dr. Dobh'sJournal 501 Galves¬ 


ton Dr., Redwood City, CA 94063, or 
call 800-356-2002 (from inside Calif) 
or 800-533-4372 (from outside Calif ). 
Please specify the issue number and 
format (MS-DOS, Macintosh, Kaypro). 
Source code is also available online 
through the DDJ Forum on Compu¬ 
Serve (type GO DDJ). The DDJ Listing 
Service (603-882-1599) supports 300/ 
1200/2400 baud, 8-data bits, no parity, 
1-stop bit. Press SPACEBAR when the 
system answers, type: listings (lower¬ 
case) at the log-in prompt, 

DDJ 

(Listings begin on page 108.) 

Vote for your Favorite feature/article. 

Circle Reader Service No. 5. 
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Speed: 

Profit: 

apabilities: 


Size: 


WHY YOU WANT BATCOM! 


Tkis is definitely a fun product. John Dvorak, PC Magazine Nov, 28, 1989. 

Wenham Software's Bat com is a batch file compiler that transforms your normal DOS batch files into 
“.exe J> files. Compiled programs execute much faster than normal batch files, protect your source code, 
add additional capabilities to DOS, and give your batch programs a touch of professionalism never before 
possible! 

Batcom compiles your DOS batch files with a simple one step command. Just typing “batcom demo” 
will compile your batch file named demo.hat into a file named demo.exe. That's it! Few or no changes to 
your existing batch file programs are necessary, 

Batcom speeds your DOS batch files by mterpretting each command before it needs to be executed, 
DOS must read each statement from disk as it is executed; compiled batch programs load once and go. 
This eliminates the disk thrashing that is common to many batch file programs. Each command is then 
executed in an efficient computer readable code rather than interpretted. The result is batch file programs 
that execute up to 4 times faster (and more) than normal batch files. 


Compiled batch files are your property, and you may distribute them without restrictions and without 
paying royalties. 

Batcom extends DOS with over 60 new commands: 


• Use your own user defined variables in addition 
to DOS command line parameters and environ- 
ment variables. 

■ Perform arithmetic. 

• Read and test for keyboard input. 

• Examine how much Lotus/Intel/Microsoft ex¬ 
panded (LIM EMS) memory your computer has. 

• Examine the system date and time. 

• Examine the current directory name, 

• Position the cursor. 

• AND MUCH MORE! 


• Make TSR programs! (with optional add-on 
$25). 

• 'While 1 looping. 

• Execute subroutines, 

• Easily use ANSI control sequences. 

• Perform powerful string operations. 

• Read information from the screen. 


Batcom compiles your batch files to small programs. A menu program that gives the user a choice of 
running one of four programs compiles to under 4000 bytes of memory. Try that with any other programming 
language! 

If you need to squeeze more performance from your existing batch files, or you no longer use DOS batch 
files because they aren't powerful enough, you need Wenham Software's Batcom ♦ 


Dealer inquiries invited. 


YES! Send me Batcom NOW! 

Name:_ Company: _ 

Address: _ 

City: _ State: _ Zip: _ 

Send me_at $59.95 each. Total: _ 

□ Check or money order enclosed □ Visa □ MasterCard 

Account #___ Exp. Date- 

Name of Card Holder: _ 

Send to: 

\ Wenham Software Co. 
f • J, 5 (Burley St, 

Wenham, fMa. 01984 

Or call: (508)-774-7036 

CIRCLE NO. 416 ON READER SERVICE CARD 
















1989 

D_DJ 

INDEX 


80386 

Advanced memory management (N. Margulis), Apr., 
p, 24 

Protected mode and multitasking under MS-DOS 
(T. Green), Sept, p. 64 



Actor 

For developing applications for MS Windows (J. 
Duntemann), Dec., p. 153 

Writing filters in an object oriented language (M. 
Franz), Dec., p.28 

Multiple inheritance (M, Swame), March, p. 107 

Algorithms 

Boyer-Moo re and brute-force for string searches 
(C. Menico), July, p. 74 

Autorouting with AI-based (A*) search algorithms 
(R. Nevin), Sept,, p. 16 

Simulated annealing and optimization (M.P. McLaugh¬ 
lin), Sept,, p. 26 

For precedence trees (M. Peterson), Sept., p. 44 

LZW data compression algorithm (M. Nelson), Oct., 
p. 29 

Sequential algorithm and multitasking (R. Kar), Nov, r 
P 16 

ANSI C 

From K&R to (S.R. Ladd), Aug., p. 74 

Discussion of changes and uniformity (A. Stevens), 
Nov., p. 133 

Update (A. Stevens) Dec., p 144 

Dennis Ritchie on (A. Stevens), C Sourcebook, p 8 

A PL* PLUS/PC 

Review of STSC's product (C. Burke), Feb., p. 72 

Assemblers 

MS-DOS reviewed (M;. Schmidt), Jan., p. 70 

Assembler code 

Customizing tor speed and reliability (M, Abrash, 
D. Illowsky), SepL, p, 52 

Asynchronous communications 

TINYCOMM (A Stevens), Feb,, p. 115 

AWK 

Writing AWK-like extensions to C (J. Mischel), June, 
p. 64 

Revisited ("Letters"), QcL, p, 12 



Back propagation 

Neural networks and noise filtering (C. Kli- 
masauskas), Jan., p. 32 

Algorithm for multilevel neural net work (M. Swaine), 
Aug., p. 134 

Benchmarks 

an apologia (G Vase, D. Weil), Feb., p. 36 
Cstatements (D. Fox), Feb., p. 60 
Rhealstone (R. Kar, K. Porter), Feb., p. 14 
Turbo C and QuickC (S.R. Ladd), Aug., p 89 

Binary trees 

Ordered by precedence trees (M. Peterson), Sept.. 
p . 44 

Vs. B-trees ("Letters"), Nov,, p.8 

Blackjack simulation 

C programming (A. Stevens), July, p. 113 

Boyer-Moore algorithm 

For faster string searches (C. Menico), July, p. 74 

Vs. brute force ("Letters"), Gel,, p. 12 

Breadth-first search algorithm 

Auto routing with the A* algorithm (R. Nevin), Sept., 

p. 16 

Brute-force method 

Combined with Boyer-Moore tor string searches 
(C. Menico), July, p. 74 
Vs. Boyer-Moore ('Letters"). Oct., p. 12 



C++ 

Compared to Modula-2 (S. Ladd), Jan., p. 62 
Extended directory searches (J. Dlugosz), March, 
p. 55 

Multitasking kernel (T. Green), Feb., p. 45 
TAWK —a simple interpreter (B. Eckel), May, p. 50 
The wave of tomorrow? [A. Stevens), Aug., p. 141 


Implementing simulation systems (T. King). SepL, 
p 40 

Books, compilers, window object (A. Stevens), Sept., 
p. 121 

Linked list class: some compilers and preproces¬ 
sors (A. Stevens). Nov,, p, 133 
Home brew, table driven parser generator (J. 
Dlugosz), Dec,, p, 40 

Object-Oriented Program Design by M. Mullins (A. 

Stevens), Dec., p. 144 
C to C++ (A. Stevens), C Sourcebook, p. 32 
String Classes (S. Ladd), C Sourcebook, p, 8 

C Interpreter 

Build your own (H, Schildt), Aug , p. 38 

SI: a CJike script interpreter (A. Stevens), May, 

p. 117 

C interpreter for OS/2 and run-time linking (A. 

Schulman), Nov., p. 46 
C Programming (At Stevens) 

Microsoft C bridge added to project, Jan., p, in 
TINYCOMM, Feb., p. 115 
TINYCOMM begets SMALLCOM, March, p. 113 
A phone directory and XModem for SMALLCOM. 
Apr., p. 109 

SI: a C-like script interpreter. May, p. 117 
Scripts for SMALLCOM, June, p. 119 
Blackjack simulation program, July, p. 113 
C++ the wave of tomorrow, and typedef misuse, 
Aug,, p. 141 

C++ books, compilers, a window object, and exten¬ 
sions, Sept., p, 121 

C++ tools, menu classes, the string class, and 
ANSI, Oct.,p. 123 

Linked list class for C++. Nov., p, 133 
Compilers and preprocessor, Nov„ p, 133 
TEXTSRCH (document retrieval system), ANSI up¬ 
date, Dec., p. 144 

C Programming 

"C’erious Toolkit, TSR Systems, review (K. 
Weiskampj, Apr., p. 92 

Writing AWK-like extensions to C (J, Mischel), June, 
p. 64 

And Smalltalk {D. Thomas, R. Best), August, p. 16 
C-to-Fortran —C tools and Fortran libraries (M. 
Floyd), Aug., p 22 

Conversion medium (PCX images to Postscript 
printers) (K, Quirk), Aug., p. 30 
Building your own C interpreter (H. Schildt), Aug., 
p. 38 

C multidimensional arrays at run time (P Ander¬ 
son), Aug. f p. 50 

C dynamic memory use (R, Meritatt), Aug., p 62 
C procedure tables (T. Borens), Aug., p. 68 
ANSI C from K&R (S,R. Ladd), Aug., p, 74 
A generic Heapsort algorithm in C (K Russell). 
Aug., p. 81 

Turbo C and QuickC (Examining Room, S.R Ladd), 
Aug., p. 89 

C Windows Toolkit 8 PCX Programmers Toolkit 
(Examining Room, T. Castle), Aug. p. 91 
Concurrent G tor real-time programming (N. Ge- 
hani, W. Rooms), Nov, p. 38 
Concurrent C for discrete event simulation (N. Ge- 
hani, W. Roome), G Special, p 24 
C Windows Toolkit 

Examining Room review (T. Castle), Aug., p 91 

cdev 

And Object C on the Mac (B. Waters), Mac Journal, 
p. 50 

Cellular automata 

A new way of simulation (J. Coppola, F. Marchese), 
Sept,, p. 34 

Code optimization 

Optimization technology for writing faster code (K. 
Rowe), June, p. 56 

Color QuickDraw 

Adding color and using multiple monitors (C. 

Derossi), Mac Journal, p, B 
Combinatorial optimization 
Solving with the technique of simulated annealing 
(M.P. McLaughlin), Sept., p. 26 
Common View 

Examining Room review (N. Bergman), Oct., p. 74 


Communication 

PC-to-minicomputer communication (M, Servello), 
Oct., p, 18 

Hamming-code decoding (B. White), Oct., p. 52 

Communications protocols 

Finite state machine for XModem (D, Smith), Oct., 
p. 45 

Kermil meets Modula-2 (B, Anderson), May, p. 22 

TtNYCOMM (A. Stevens), Feb., p, 115 

Compaction technique 

Memory allocation compaction system (S. Peter¬ 
son) , Apr, p. 50 

Compilers 

Routines for use with; QuickPak Professional: re¬ 
view (B, Tonkin), Apr., p. 96 

Also see "Examining Room" 

Container objects 

Turbo Pascal, packaged in library modules (A, 
Hejlsberg), Nov,, p. 56 

Coprocessors 

Multitasking OS and graphics (Amiga) (C. McMa- 
nis), July, p. 36 



Data acquisition 

A real-time system (M. and M. Bunnell), June, p. 36 

Data communications 

Finite slate machine for XModem (D. Smith), Oct., 
p. 45 

PC-io-minicomputer communication [M. Servelto), 
Oct., p. 18 

Hamming-code decoding (B. White), Oct,, p, 52 
High-speed file transfers (C. Menico). Oct, p. 38 

Data compression 

All-purpose technique for programming toolbox 
(LZW) (M, Nelson), Oct., p. 29 
RLE reduces storage requirements (R. Zigon), Feb., 

p, 126 

Another approach to RLE (R Daley), May, p. 130 
More on RLE (' Letters"), Oct., p. 12 

Data-flow 

Diagrams —using mapping to improve the quality 
of (G. Lazarev), Qct„ p- 61 
Multitasking and sequential algorithm (R. Kar), Nov., 

p. 16 

Debugging 

TSR Programs with Turbo Debugger (C. Menico), 
Feb., p. 67 

Edward K. Ream's Sherlock debugger (Examining 
Room, A. Lane) Apr, p, 91 
With Borland's Turbo debugger (B. Catchings, M. 
Van Name), July, p 64 

C programs, (B. Edgar), C Sourcebook, p. 56 

Demand paging 

Demand paged virtual memory (K. Dahlgren). Apr,. 
P-32 

Advanced 80386 memory management (N. Mar- 
gulis), Apr., p. 24 

DESQview 

Using the API to develop the parallel dvmake (M. 
Stretch), Nov., p. 28 

Device drivers 

That support true global variables (J, Mischel), 
Oct., p. 70 

Loading with an I NIT on the Mac (J, Rosford), Mac 
Journal, p. 15 

Mac Device Manager, template with Think C (B. 
Waters), Mac Journal, p. 36 

Directories 

Extended searches using C++ (J. Dlugosz), March, 
p. 55 

DOS 

Three utifties for with Modula-2 (K. Porter), Jan,, 
p, 120 

Undocumented DOS (R. James), June, p. 26 

DOS Exec 

More memory through swapping calling programs 
(K. Kokkonen), April, p. 14 
Dynamic link libraries (DLLs) 

Under MS Windows (M. Johnson, M. Sol in ski), 
March, p. 28 
Dynamic finking 

Linking while the program is running (A. Schulman), 
Nov., p. 46 
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The GFX Libraries 


T he three GFX libraries have been translated from C to Pascal 
and Modula 2. No memory-hog TSRs to eat precious ram. 
Just small, fast linkable libraries. Each library stands alone. 
Use them together ot with other graphics libraries. And of course, we 
provide all the source code. 

Common features include: 


GFX Fonts &: Menus Library 

Now you can add a slick graphics 
user-interface to your programs: 
pull-down menus driven by mouse 
or hot-keys; dialog boxes; forms 
boxes; context-sensitive help; huge 
font selection (100+ fonts). 

List Price: Source code - $150 


Source Code: in your language. 

No Royalties: for straight application programs. 

Video Modes: Hercules, CGA, EGA, VGA (up to 800x16x16). 
Supported Compilers: C — Microsoft, Borland, Lattice, Meta ware, 
Zortech; Pascal — Borland (5.5); Modula 2 — JP1 and Stony Brook, 



, § 


RDF1LE 


There Are Script Fj 
Foreign Language 'a 
A'FYKTKfl cjfl 


GFX Font %l Icon Editor 

Not a library, but a fully blown 
editor. Make new fonts or modify 
fonts provided with GFX Fonts & 
Menus Library. Create new fonts 
or bitmapped icons. Use all 255 
characters for fixed or proportional 
width fonts. Source code is only 
in C. 

List Price: Source code - $100 

Executable - $75 


GFX Graphics Library 

More power and speed than your 
compiler's library. Use virtual 
colors and auto-scaling to write 
code that adapts to any video mode 
at run-time. You also get rubber¬ 
banding and multiple viewports 
with automatic clipping and 
interger and floating-point scaling. 
List Price: Source code - $150 

GFX Screen Dump Library 

Use this library to dump a graphics 
screen to a printer. We support 
most dot matrix, laser and color 
printers. Add new printers by 
filling in a table* Stretch the output 
to adjust for differences between 
video and printer resolutions. 

List Price: Source code - $100 

Executable - $75 


■ FREE BBS 

Extensive demos & info on all our 
products from a 24hr BBS, 

BBS: (816) 478-0944 
8 Data/I Stop/No Parity 

■ SPECIAL OFFER 

Call us for special pricing for 
ordering direct from C Source* 

Get our brochure on these and 
other programmers products. 


C Source, Inc. 

400 NJL Point Dr. 
Lee's Summit, MO 64064 
TEL: (816) 478-1888 
FAX: (816) 478-3133 


CIRCLE NO, 350 ON READER SERVICE CARD 




































Dynamic memory 

Coping with C dynamic memory problems (R. Meri- 
latt), Aug., p. 62 



Editors 

VEdit Plus (Examining Room, T.A. Elkins), Aug,, 
p- 90 

An icon editor (K, Weiskamp, L Helny) t July, p, 24 

Eiffel 

Its development and use (B, Meyer), Dec., p. 48 
Multiple inheritance (M. Swaine), March, p. 107 

EGA 

Matching colors (K, Porter), April, p. 116 
Examining Room product reviews 
Microsoft's MASM 5.1, Borland's TASM 1.0, and 
SLRsOPTASM 1.5 (M, Schmidt), Jan., p. 70 
STSC’s APL'PLUS II (C, Burke), Feb., p. 72 
Advanced Programming Institute's XVT Toolkit (M. 
Johnson), March, p. 70 

Crescent Softwares QuickPak (B. Tonkin), Apr,, 
p. 96 

QuickC vs. Turbo C (S.R. Ladd), May, p. 66; Aug,, 
p. 89 

Abraxas Software's PCYACC (A. Lane), June, 
p. 76 

Borland's Turbo Debugger (B. Catchings. M. Van 
Name), July, p. 64 

Genus's 0 Tools and PCX Programmer's Toolkit 
(T. Castle), Aug„ p, 91 

CompuViewE VEdit Plus (T.A. Elkins), Aug,, p. 90 
Watcom C7.0 (J. Dlugosz), Sept,, p. 74 
Common View (N. Bergman), Oct., p, 74 
Silicon Graphics (SGI) parallelization scheme (B. 
Bauer), Nov., p. 72 

Crescent Software's PDQ for QuickBasic (B. Tonkin), 
Dec., p. 88 

Extended memory 

Using on the PC AT (P. Thomson), Jan,, p. 106 

Extensible hashing 

Keyed random access method (S. Heller), Nov., 

p. 66 

Extensible Virtual Toolkit (XVT) 

API's product reviewed (M. Johnson), March, p. 70 
External Commands (XCMDs) 

Quick drawing with (J, Anderson), May, p. 63 



File transfers 

High speed with NetBIOS (C, Menico). Oct., p 38 

Filters 

With an object-oriented language (M. Franz), Dec , 

p. 28 

Finite state machines 

For XModem, but general enough for other proto¬ 
cols (D. Smith), Oct., p 45 
Programming (' Letters"), Nov., p. 12 
Force-based simulations 
C++ and implementing simulation systems (T. King), 
Sept,, p, 40 
Forth 

A timed event network scheduler in (G. lig, FL 
Brown), Feb,, p, 52 

An extension of with TENS, Feb., p. 52 

Forth Column, The (M Tracy) 

Forth news and Mandlebrot plotting program, Feb., 
p. 136 

Fortran 

Connecting with C (M. Floyd), Aug,, p. 22 
Functional Programming 
Report on FPCA 89 and Haskell language (R. 
Fischer), Dec., p. 96 



Global variables 

A global variable device driver (J. Mischel), Oct., 
p. 70 

Graphics 

Coprocessors with multitasking OS (Amiga) (C. 
McManis), July, p. 36 
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NDEX 


Line-of-best-fit (W. Murray, C. Pappas), July, p, 14 
An Icon editor (K. Weiskamp, L. Heiny), July, p. 24 
Image mathematics (V. Duvanenko), July, p, 45 
Graphics Programming (K. Porter) 

How to draw a pixel on the EGA/VGA, Feb., p. 121 
Lines galore, March, p* 11B 
Matching colors on the EGA, Apr, p. 116 
GRAFIX viewport, May, p. 124 
A routine that senses pixels; filling closed figures, 
June, p. 124 

Virtual coordinates, July, p. 119 
And curves. Aug., p. 146 

Greedy algorithm 

For locating a global optimum In a discrete space 
[M.P. McLaughlin), Sept, p. 26 



Hamming-code theory 

In "Hamming-Code Decoding" (B. White), Oct., 
p .52 

Hardenbergh, Hal 

Interview with about neural nets (M. Swaine), July, 

p. 100 

Haskell language 

In report on Functional Programming Conference 
'89 (R. Fischer), Dec., p. 96 

Heapsort algorithm 

A sorting tool for any language (K Russell), Aug., 

p. 81 

HyperCard 

XCMDs provide access to QuickDraw (J. Ander¬ 
son), May, p. 63 



Icon editor 

Roil your own icons w/mouse (K, Weiskamp, L. 
Heiny), July, p. 24 

Image processing 

Arithmetic functions to combine and enhance im¬ 
ages (V. Duvanenko), July, p. 45 

Index 

DDJ 1988 {K. Ralston). March, p, 93 

INIT 

Loading device drivers with, on the Mac (J. Rosfond), 
Mac Journal, p. 15 

Interprocess communications 

In QSy2 (FL Duncan), June, p. 15 

Interpreters 

Build your own (H. Schildt), Aug., p. 38 
SI; a C-like script interpreter (A. Stevens), May, 
p, 117 

C interpreter for OS/2 and run-time linking (A. 
Schulman), Nov,, p, 46 

Small languages for specific tasks (M. Abrash, D. 
Illowsky), Sept., p. 52 



K&R 

Differences with ANSI C (S.R. Ladd), Aug., p. 74 

KHAM 

Keyed random access method —extensible hash¬ 
ing (S. Heller), Nov, p. 66 

Kermit 

Meets Modula-2 (B. Anderson), May, p. 22 



LabView 

Visual OOP with [R. Dye), Mac Journal, p. 30 

Languages 

Variable-level programming (R. Fischer), June, 
P- 46 

Small languages for specific tasks [M. Abrash, D. 
Illowsky), Sept,, p. 52 


Linked lists 

A class for C++ (A. Stevens), Nov,, p, 133 

Logic gates 

And neural networks (T. King), Jan., p. 15 



Macintosh 

XVT for developing portable applications (M. 
Johnson), March, p. 70 

Color QuickDraw (C. De Rossi), Mac Journal, p. 8 
Avoiding INIT collisions (J, Rosford), Mac Journal, 

p. 14 

Memory management with MacAPP (CL Bianchi), 
Mac Journal, p. 22 

Visual object-oriented programming (R. Dye), Mac 
Journal, p, 30 

Writing Macintosh device drivers (B. Waters), Mac 
Journal, p, 36 

Persistent objects (C. Rovira), Mac Journal, p 40 
Wizardcopy for fast backups (D. Caspar), Mac 
Journal, p, 44 

Object C and the Macintosh control panel (9. Wa¬ 
ters), Mac Journal, p. 50 

On being or becoming a Macintosh developer (J. 

Custer), Mac Journal, p. 54 
XCMDs provide access to QuickDraw (J. Ander¬ 
son), May, p. 63 

Network graphs in Object Pascal ($. Kienle), Dec., 
p 17 

make 

dvrnake with the DESGvtew API (M. Streich), Nov., 

p. 26 

MASM 

Microsoft's assember (Version 5.1} reviewed (M. 
Schmidt), Jan., p. 70 

Mathematics 

Arithmetic functions can enhance imaging (V. Duva¬ 
nenko), July, p. 45 

Memory 

Using extended memory on the PC AT (P. Thom¬ 
son), Jan., p, 106 

More memory for DOS Exec (K. Kokkonen), Apr., 
p. 14 

Advanced 80386 memory management (N, Mar- 
gulls), Apr., p. 24 

Demand paged virtual memory (K Dahlgren), Apr,, 
p, 32 

SWAP — application-independent method (N. Mak), 
Apr, p 44 

Memory allocation compaction system (S* Peter¬ 
son), Apr,, p. 50 

Management with MacApp (C, Bianchi), Mac Jour¬ 
nal, p. 22 

Microsoft C 

Surrogate library makes "C Programming" project 
compatible with MSC, (A, Stevens), Jan., 
p. Ill 

Mini-interpreters 

Define smalt languages lor specific tasks {M, Abrash, 
D. illowsky). Sept., p, 52 

Minilanguages 

Roll your own with mini-interpreters (M. Abrash, D. 
Illowsky), Sept., p. 52 

Modula-2 

Compared to C++ (S.R. Ladd), Jan., p. 62 
Three utilities for DOS (K. Porter), Jan,, p, 120 
Meets Kermit (B. Anderson), May, p. 22 

MS-DOS 

Assemblers compared (M. Schmit), Jan„ p. 70 
Real-time modeling with (D. Bowling), Feb., p. 26 
Application-independent method {N Mak), Apr. 
p. 44 

Undocumented DOS (R. James), June, p. 26 

MS Windows 

DLLs under (M. Johnson, M. Solinski), March, p. 26 
XVT for developing portable applications (M. 
Johnson), March, p. 70 

Microsoft Windows SDK and Actor (J, Duntemann), 
Dec., p. 153 

Multitasking 

C ++ kernel (T. Green), Feb., p. 45 

80386 protected mode (T. Green), Sept., p. 64 
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Compare Lattice Performance, 
Features, & Value! 

lattice c 

DEVELOPMENT 
SYSTEM FOR 
DOS & OS/2 

• Runs under DOS or OS/2 to create DOS, 
OS/2, and Family Mode Programs 

• C language extensions for added 
versatility 

• Global Optimizer allows your program to 
run up to 30% faster 

• OS/2 API Library and Bind Utility 
eliminate the need for OS/2 
developers kit 

ONLY $250.00 

lUr ® f LATTICE 80286 C 
\ DEVELOPMENT 

W*r* _ 7IL L SYSTEM FOR 

■Ul DOS & OS/2 

» Runs under DOS or OS/2 to create DOS, 
OS/2, or Extended DOS Programs 

• 8028b DOS Extender with no run-time 
royalties! 

• Creates programs of up to nearly 16 MB 

• Extended DOS Configuration Optimizer 
assures maximum performance 

• Compiler, Debugger, Libraries, and Tools 
Performance Tuned for 286 Systems 

• Improved debugging environment 
speeds program development 

ONLY $495.00 


LATTICE 80386 C 
DEVELOPMENT 
SYSTEM FOR 
DOS & OS/2 

• Runs under DOS or OS/2 to create OS/2 
or Extended DOS Programs 

• Creates Programs using full 32-bit power 

• 80386 DOS Extender with no run-time 
royalties! 

• Compiler, Debugger, Libraries, and Tools 
Performance Tuned for 386 Systems 

• Compatible with PharLap DOS Extender 

ONLY $895.00 





mm 

tv 



% 



jt ._f 

Mi 



Lattice Enriches Your Environment 

Lattice offers programming tools that let you take full advan¬ 
tage of today's high-powered hardware and operating environ¬ 
ments. Each Lattice Development System contains the benchmark- 
winning Lattice Optimizing C Compiler, CodePRobe source-level 
debugger, LASM macroassembler, hundreds of Library Functions, 
and dozens of Powerful Tools — all specifically tuned for your 
programming environment. 


When your programming environment changes, Lattice is 
there with on-going support. With 100% ANSI compatibility, pro¬ 
grams written in Lattice C are highly portable. And only Lattice 
offers such a large selection of C compilers, C cross compilers, and 
embedded systems C compilers for a wide range of host/target 
hardware and operating systems. 


Order a Lattice C Development System Today! Each Lattice 
product comes with a 30-day, money-back satisfaction guarantee 
plus unlimited free technical support. Lattice products are avail¬ 
able from dealers and distributors worldwide or directly from 
Lattice, Call 1-800-444-4309 Today! 


Lattice 


Professional Program tiling Tools Since 1981 
Lattice, Inc. 

2500 S, High land Avenue Lombard, IL 60148 
Telephone: 708/916 1600 Facsimile: 708/916-1190 


CALL OR WRITE TODAY FOR 
A FREE CATALOG LISTING 
ALL LATTICE TOOLS. 
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Multitasking OS 

And graphics coprocessors (Amiga) (C. McMants). 
July, p. 36 

Real-time data acquisition (M. and M. Bunnell), 
June, p. 36 

Interprocess communications in OS/2 (R, Duncan). 
June, p. 14 

Multiple inheritance 

Is it necessary? (M, Swaine), March, p. 107 
Writing correct software with Eiffel (B. Meyer), Dec,, 
p, 48 

Are the emperor’s new clothes object oriented? (S. 
Guthery), Dec,, 80 



NetBIOS 

For high-speed file transfers (C. Menico), Oct., 
p. 38 

Network graphs 

In Object Pascal [S, Kienle), Dec., p. 17 

Network windowing 

Using the X Window System (J. Gettys). March, 
p. 42 

The OSF windowing system {K. Hinckley). March, 
p. 78 

Networking protocols 

Developing with Unix Streams (M, Garwood, A. 
Schweig), Jan., p, 50, 

Neural networks 

And noise filtering (C, Klimasauskas), Jan., p. 32 
Artificial neural networks & signal processing (S. 
Melnikof), Jan,, p. 36 

For signal processing (S, Melnikof), Jan,, p. 36 
Using tor pattern recognition {T. King), Jan., p. 14 
Interview with H, Hardenbergh about (M. Swaine), 
July, p. 100 

Background on backpropagation (M, Swaine), Aug., 
p. 134 

History of (M, Swaine), Sept., p. 114 
MINOS II and ADAM I, early neural nets (M. Swaine), 
Nov., p. 124 

Noise filtering 

And neural nets (C, Klimassauskas). Jan., p. 32 

□ _ 

Object-oriented programming 

Multiple inheritance (M. Swaine), March, p. 107 
Basic concepts in OOP {M. Floyd), Apr, p. 58 
With Turbo Pascal [M. Floyd), July, p. 56 
Smalltalk, the legend (J. Duntemann). Aug., p. 154 
Pascal objects (J. Duntemann), Sept., p. 128 
Writing filters (M. Franz), Dec., p. 28 
With Eiffel (B. Meyer), Dec., p. 4S 
Simulated bench environment — LogicLab (K. 
Ayers), Dec., p. 72 

Are the emperor's new clothes object oriented? (S. 
Guthery), Dec., p. 80 

GOP SLA 89 conference report (M. Swaine), Dec., 
p. 140 

Visual OOP with Lab View fR. Dye), Mac Journal, 
p. 30 

Object C and Mac cdeis (li Waters). Mac l emma I. 

p, 50 

Object Pascal 

And network graphs (S. Kienle), Dec., p. 17 
MS GuickPascal user interface (J. Mouhanna, M. 
Vose), Dec,, p, 64 

OOPSLA T 09 

Report on conference (M. Swaine), Dec ., p, 140 

Open Software Foundation (OSF) 

Windowing system (K. Hinckley), March, p. 78 

OPTASM 

SLRs assembler (Version 1.5) reviewed, Jan,, 
p, 70 

Optical character recognition system (OCR) 

And neural networks (T. King), Jan., p. 14 

Optimization 

Writing faster code (K. Rowe), June, p. 56 
In a parallel environment (Examining Room.. B, 
Bauer), Nov., p, 72 


OS/2 

Interprocess communications facilities (R. Duncan), 
June, p. 15 

Run4ime dynamic linking, mini C interpreter (A. 
Schulman). Nov., p. 46 



Pascal 

With objects (J. Duntemann), Sept., p. 128 

Parsers 

Generating with PCYACC, review (A. Lane), June, 
p. 76 

Table-driven generator (J. Dlugosz), Dec., p, 40 
Pattern recognition 

Using neural networks for [T. King), Jan., p, 14 

PC AT 

Using extended memory on (P. Thomson), Jan,, 

p, 106 

PCX files 

Translating to Postscript printers with C (K, Quirk), 
Aug., p. 30 

PCX Programmer's Toolkit 

Examining Room review (T Castle), Aug., p. 92 

Persistent objects 

For writing database management systems in Small¬ 
talk (C. Rovira), Mac Journal, p. 40 

PEX 

3-D graphics for X, March, p. 49 

Pixels 

Howto draw on EGA/VGA (K. Porter), Feb., p. 121 
A routine thai senses pixels (K. Porter), June, 
p. 124 

Polymorphism 

Using it with OOP in Pascal (J, Duntemann), Nov , 
p. 142 

Precedence trees 

Improved search strategies for higher performance 
(M. Peterson). Sept,, p, 44 
Presentation Manager (PM) 

Application template (H. Schlldt), March, p. 16 
Pulling mouse and graphics to work (B. Murray, 
C. Pappas), July, p. 14 
OSF Motif (K. Hinckley), March, p. 78 
Programming Paradigms (M, Swaine) 

Future programming environments, Jan., p. 124 
Inheritance dilemma, Feb., p, 108 
Multiple inheritance. March, p. 107 
Lisp; superlinearity speedup; teaching of program¬ 
ming, Apr., p. 98 

Interview with Robert Floyd, May, p. 107 
The mainstreaming of OOP, June, p 114 
Interview with Hal Hardenbergh —neural nets, July, 

p. too 

Background on back propagation, Aug., p. 134 
More on neural nets, history of. Sept., p. 114 
Interview with Dave Parker on backprop, Oct., 
p. 112 

MINOS II and ADAM I. early neural nets, Nov., 
p. 124 

Report on OOPSLA 89. Dec,, p. 140 

Prolog 

Executable specifications with (G. Lazarev), Oct., 
p 61 

Protected mode 

On the 80386 for memory protection and multi¬ 
tasking (T. Green), Sept, p. 64 

Puzzles 

The Puzzling Adventures of Dr. Ecco—b ook re¬ 
view (J. Amsterdam), Apr., p. 96 



GuickBasic 

Code runs fast with PDQ (Examining Room., B. 
Tonkin), Dec,, p, 86 

QuickC 

Vs, Turbo C — review (S R. Ladd), May, p. 68 
Vs. Turbo C benchmark sum up —review (S.R. 
Ladd), Aug„ p. 89 

Quick Pa seal 

MS GuickPascal user interface (J. Mouhanna, M. 
Vose), Dec., p. 64 



Real time 

Development of kernels with TENS (G. Ilg, R.J, 
Brown), Feb,, p. 52 

Modeling with MS-DOS (D. Bowling), Feb., p. 26 
Rhealstone benchmark {R. Kar, K. Porter), Feb,, 
p 14 

Real-time data acquisition (M. and M. Bunneil), 
June, p. 36 

ffy controller in Concurrent C (N, Gehani, W. Roome), 
Nov,, p. 38 

Rhealstone 

A real-time benchmarking proposal (R. Kar, K, Por¬ 
ter), Feb., p. 14 
Run length encoding (RLE) 

Reduces storage requirements (R, Zigon), Feb., 

p. 126 

Another approach (P. Daley), May, p. 130 
More on {''Letters' ), Oct., p, 12 

Run-time 

Dynamic linking under OS/2, with a mini C inter¬ 
preter {A, Schulman), Nov., p. 46 



Sbench 

Program generator for better C code (Fox), Feb.. 
P 60 

Sector copying utility 

WizardCopy for the Mac (D. Gaspar), Mac Journal, 
p. 44 

Simulated annealing 

Solving combinatorial optimization (M McLaugh¬ 
lin). Sept., p. 26 

Cellular automata (J. Coppola, F Marchese), Sept., 
p. 34 

Simulated bench environment 

LogicLab system (K. Ayers), Dec., p. 72 

Simulations 

Force-based simulations and C++ (T. King), Sept., 
p. 40 

Signal processing 

And artificial neural networks (S, Melnikof), Jan., 
p, 36 

SMALLCOM 

Extension of TINYCOMM (A. Stevens), March, 
p. 113 

With file transfer protocols and XModem (A. Ste¬ 
vens), April, p. 109 

With a script interpreter {A, Stevens), May, p. 115 
Scripts for (A. Stevens), June, p. 119 

Smalltalk 

The ultimate object-oriented language (J, Dun¬ 
temann), Aug,, p. 154 

+ C to add power to your programs (D. Thomas, 
R. Best), Aug., p. 16 

GO LogicLab system, simulated bench environ¬ 
ment (K. Ayers). Dec., p 72 
For PM (J. Duntemann), Dec,, p. 153 
Persistent objects for database management (C. 

Rovira), Mac Journal, p, 40 
Software development 
For the Mac (J. Custer), Mac Journal, p. 54 
Software metrics 

Coping with complex programs (K. Siyan), March, 
p. 60 

String searches 

Writing AWK-like extensions to G (J, Mischel), June, 
p. 64 

Boyer-Moore algorithm combined with brute-force 
[C. Menico), July, p. 74 

Structures 

Language-independent dynamic pseudostructures 
(B, Tonkin), May, p. 39 
Structured Programming {J Duntemann) 
Modula-2 put to work with three utlities for DOS (K, 
Porter), Jan., p. 120 

Return of the shower curtain salesman, Feb„ 
p. 130 
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The joy of C-scape 


he C-scape™ Interface 
Management System frees C 
programmers from the tedium of 
coding windows, menus, data 
validation, help, and text editing 
functions. 

Moreover, C-scape is a joy to use. With 
C-scape's object-oriented design, you’ll 
build more functional, more flexible, 
more portable, and more unique 
applications—and you T ll have more fun 
doing it* 

The industry standout. Many 
thousands of programmers have quit 
home grown libraries and cumbersome, 
inflexible products for the pleasure of 
C-scape. The press agrees: "C-scape is by 
far the best... a joy to use, 11 wrote IEEE 
Computer . PC Magazine chose C scape 
to produce its Laboratory Benchmark 

Series 5.0 software because 
C-scape offers mouse 
support. Moreover, C-scape 
simultaneously combines 
text and graphics. And because C-scape 
makes it easy to create your own custom 
routines, m^jor companies have selected 
C-scape as a standard for software 
development. 

C-scape is built around an open 
architecture, so you can use it with data 
base management or other C libraries. 


C-scape Features 

Graphics* Combine high resolution color graphics 
with text or menus. 

Object-oriented. Add features and create 
reusable code modules. 

Mouse* Use any standard mouse for fast screen 
control. 

Portability. Write hardware independent code. 
Supports DOS, OS/2, UNIX, others. Autodetects 
Hercules, CGA, EGA, VGA. 

Text editing. Create a fidl-featured text editor or 
pop-up note pad. 

Field flexibility. Create masked, protected and 
marked Helds with complete data validation. Use 
time, date, money, pop-up list, and many more 
functions, or create your own* 

Windows. Choose from pop-up, tiled, bordered 
and exploding windows, with size and numbers 
limited only by RAM. 

Menus. Choose from pop-up, pull-down, 123 style, 
or slug menus, or create your own* 

Context-sensitive help. Link help messages to 
individual screens or fields. Cross reference 
messages to create hypertext-like help. 

Screen design. Build any type of screen or form 
with the Look and Feel™ Screen Designer, then 
automatically convert it to C. 

Screen flexibility. Call screens from Hies at 
run time or link them in. 


And to port from MS-DOS or OS/2 to 
UNIX, just recompile. 

Trial with a smile, c -scape is not 
only the most sophisticated, flexible and 
powerful interface system available, it’s 
also the most friendly—and easiest to 
use. Try C-scape on a 30-day trial. It 
comes with a thorough manual, demo 

disk, sample programs with 
source code, an optional 
screen designer and code 
generator, access to a 
24-hour bulletin board, and toll-free 
support. No royalties, runtime licenses, or 
runtime modules. After you register, you 
get complete library source code at no 
extra cost. 

Call 800-233-3733 {617-401-7311 

in Mass.) to try C-scape now. After the 
joy of C-scape, programming will never be 
the same. 

MS-DOS, OS/2: $399, library only; with 
Look & Feel, $499, UNIX, XENIX, Apollo, 
Sun, Stratus, others please call. 
Mastercard and Visa accepted. 



Oakland Group, Inc. 675 Massachusetts Ave., Cambridge, MA 02139 USA. FAX: 617868-4440; Washington 206-746-8767; Benelux (02159)46814; Denmark 
(02)88 72 49; France (1)46 00 28 28; Germany/Austria/Switzerland (49)07127/5244; Norway (02)44 88 55; Sweden (013)124780; U.K. (0902)500010. C-scape and 
Look & Feel are trademarks of Oakland Group, Inc. MS-DOS and XENIX are trademarks of Microsoft Corp. OS/2 is a trademark of International Business 
Machines Corp. UNIX is a trademark of AT&T. HERCULES is a trademark of Hercules Computer Technology, Inc. Prices and terms subject to change. 
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Text screen metrics and Comdex, March, p. 123 
Speed windows graphics and virtual screens, Apr, 

p. 120 

Type casting in Turbo Pascal and Modula-2, May, 
p, 132 

Writing assembly code with HLLs, June, p. 130 
OOP —the next generation of structured methods, 
July, p. 128 

Smalltalk the ultimate object-oriented language, 
Aug., p. 154 

Pascal with objects, Sept., p. 128 
Object-oriented glossary, Oct„ p. 132 
Polymorphism and OOP In Pascal, Nov,, p. 142 
MS Windows, Actor, Smalltalk/V PM and OOP, 
Dec,, p. 153 
SWAP 

Application-independent method for MS-DOS (N, 
Mak), Apr,, p, 44 

System security 

Avoiding file system vulnerability and threats to 
network security (D. Moir), June, p. 75 



TASM 

Borland assembler [Version 1.0) reviewed, Jan,, 
p. 70 

TAWK 

A simple interpreter in C++ (B, Eckel), May, p, 50 

Text screen metrics 

Text-oriented programs need to be video adapter 
' aware 11 (J. Duntemann), March, p. 123 

Timed event network scheduler (TENS) 

tn Forth [G. Ilg, R, Brown), Feb., p. 52 

TINYCOMM 

The tiny communications program (A. Stevens), 
Feb,, p, 115 


TSB (Termlnate-and-Stay-Resident) programs 

Debugging, Feb,, p. 67 

Part 1, creating TSRs with Turbo Pascal (K, Potte- 
baum). May, p. 14 

Part 2, putting common TSR tasks to work (K. 
Pottebaum), June, p, 72 

Turbo C 

To MSG surrogate library (A. Stevens), Jan., p. ill 

Vs, QuickC — review (S. Ladd), May, p. 68 

Vs, QuickC benchmark sum up —review (S. Ladd), 
Aug*, p. 89 

Turbo Debugger 

Using Borland's product to debug TSHs (G, Me- 
nico), Feb,, p, 67 

Examining Room (B. Catchings, M. Van Name), 
July, p. 64 

Turbo Pascal 

More memory for DOS Exec (K. Kokkonen), April, 
p. 14 

Part 1, creating TSR programs with (K. Pottebaum), 
May, p. 14 

Part 2, putting common TSR tasks to work [K. 
Pottebaum), June, p. 72 

Turbo Pascal with Objects (M. Floyd), July, p. 56 



Unix 

OSF windowing system (K. Hinckley), March., 
p, 78 

Streams [M. Garwood, A. Schweig), Jan., p. 50 



Variable-level programming 

Languages that accomodate a range of needs (FL 
Fischer), June, p, 46 


VEdit Plus 

Examining Room review [T,A. Elkins), Aug., p, 90 

Virtual coordinates 

In graphics programming (K, Porter), July, p. 119 



Watcom C7,0 

Review [J. Dlugosz), Sept., p. 74 

Windows 

Quick Pascal's OG user interface {J. Mouhanna. 
M. Vose). Dec., p, 64 

Microsoft Windows SDK and Actor (J, Duntemann), 
Dec, , p. 153 

WtzardCopy 

Sector copying utility for the Mac (O, Gaspar), Mac 
Journal, p. 44 



X/GEM 

Writing portable applications with [B. Fit lor) r March, 
p. 38 

XCMDs 

External commands —quick drawing with [J, An¬ 
derson), May, p. 63 

XModem 

A finite state machine for [D Smith), Get, p, 45 

XVT 

See Extensible Virtual Toolkit 

X Window System 

Network windowing using (J. Gettys), March, p, 42 
PEX 3-D graphics for, March, p, 49 
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Add lightning fast graphics to your programs quickly and easily through the popular 
PCX file format Why reinvent the wheel? Make your programs immediately compatible 
with hundreds of packages from Aldus PageMaker to ZSoft's PC Paintbrush with these 
linkable graphic libraries * 

" An exceptional product 1 - Programmer s Journal, Aug ’89 siss 

Version 3,5 of the PCX Programmer's Toolkit gives you over 60 powerful functions to 
manipulate bitmapped graphics. Use Virtual screens, Super VGA modes, LIM 4.0 support, 
a 300 page manual, 9 utilities including screen capture and display, and the fastest routines 
on the market. 

Need Special Effects, but caught in a GRASP? $99 

Why create a demo when you can create the real thing? Don’t be trapped in a slideshow 
editor or demo program when you can use PCX Effects for the PCX Toolkit and your favorite 
programming language. A Music Language and spectacular effects for exploding your 
graphics! 

Blazing Graphics Text $149 

With PCX Text you can display text with graphics as fast as it always should have been. 
Display characters, strings, fixed and proportional text, background transparency, and 
more. Includes a font editor, 85 fonts, and text utilities for blazing graphics bitmapped text. 



NO ROYALTIES! 

30-DAY MONEY-BACK GUARANTEE! 
SOURCE CODE AVAILABLE! 



MICRDPRQG R ft W M | W E 

113 T 5 Meadow take ■ Houston. Texas 770 ?? • (7131 870-0737 


All packages support 12 compifers for G. Pascal, Basic, Fortran. 
Assembly, and Clipper. All modes of the Hercules, CGA, EGA, VGA, 
and Super VGA adaptors are supported, up through SOOxeiOQxSSG 
(22 modes rn all). Assembly Language source code is optionally 
available. Trademarks are property orf their respective holders. 


FAX; 713-870-0288 
Add $5/package for UPS Ground 
Texas Residents add 8% Sales Tax 


For orders and information, call: 

1-800-227-0918 

VISA/MC/AMEX/COD/CHECK/PO 
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VESA VGA BIOS 

Extensions 

A software standard for Super VGA 


Bo Ericsson 


A n integral part of IBM's PS/2 
announcement in April 1987 
was the video graphics array 
(VGA) system. Based on the 
architecture oF the enhanced 
graphics adapter (EGA), the VGA of¬ 
fered extended resolutions and a new 
256-color video mode* Since that time, 
the VGA has grown in importance and 
is today an established PC video stan¬ 
dard. As a matter of fact, all “old” video 
standards — the monochrome display 
adapter (MDA), color graphics adapter 
(CGA), Hercules Graphics Adapter, and 
EGA — are quickly losing ground to 
the VGA, 

There are several reasons for the 
VGA’s success. For one thing, the new 
VGA resolutions (see Figure 1), together 
with lower-priced multi-frequency moni¬ 
tors, have made the VGA a more attrac¬ 
tive solution than previous standards. 
Also, a multitude of VGA offerings and 
fierce competition have made a baseline 
VGA an economically attractive choice. 

As a matter of fact, competition in 
the VGA marketplace not only has 
driven the prices of VGA boards to the 
bottom, but has pushed up the features 
and capabilities of these boards. Virtu¬ 
ally all VGA controllers available Loday 
are compatible down to the register 
level with the IBM VGA, and almost all 
of Lhem implement some extensions 
to the IBM VGA, 

The term ’ Super VGA T! is used in this 
article to identify video hardware that 
implements a full superset of the stan¬ 


Bo is a software engineering manager 
at Chips and Technologies Inc3050 
Zanker Road, San Jose, CA 95134. 



dard VGA, including register compati¬ 
bility. Extensions to the IBM VGA can 
he classified into three different cate¬ 
gories: 

1. Backwards compatibility 

2. Functional extensions 

3. Higher spatial and color resolutions 

Backwards Compatibility 

The basic IBM VGA is, at best, compat¬ 
ible with older video standards only at 
the BIOS level. There is a large pop illa¬ 
tion of older programs written .specifi¬ 
cally for, and directly to, the CGA or 
Hercules Graphics Adapter that bypass 
the BIOS partially or completely. Be¬ 
cause of this* none of these applica¬ 
tions run on a standard VGA, 


However, most VGA products offer 
some register-level support for these 
older standards. These implementations 
either attempt to automatically detect 
older programs and switch into a suit¬ 
able compatible video mode or require 
a utility program to lock the video hard¬ 
ware into a compatible video mode. 

Functional Extensions 

The basic VGA is a pretty dumb device; 
the CPU (that is, the application pro¬ 
grant) is required to do almost all graph¬ 
ics processing. Only certain logical op¬ 
erations on the graphics data can be 
performed by the standard VGA hard¬ 
ware. There are no functions for BitBlts 
(bit-block-transfers), line drawing, and 
so on. 
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In graphics-intensive applications, such 
as MS-Windows, OS/2 Presentation Man¬ 
ager, and GEM, manipulating the graph¬ 
ics bitmap takes considerable time and 
affects system performance. For this 
reason, several VGA controller vendors 
have put various graphics capabilities 
directly into the VGA hardware. 

For instance, certain VGA controllers 
implement a graphics cursor in hard¬ 
ware. All graphics user interfaces (such 
as Windows, GEM, X-'Windows, Presenta¬ 
tion Manager, etc.) use a graphics cur¬ 
sor. The graphics cursor is an icon (usu¬ 
ally an arrow) that moves around the 
screen as the mouse is moved. A lot of 
CPU processing is required to move 
the graphics cursor even one pixel on 
the screen. Instead of refreshing the 
actual bitmap on a standard VGA, these 
controllers need only the coordinate 
of the “hot-spot/’ The actual display 
of the cursor is done in hardware, 
bitmap manipulation is not necessary. 

Other VGA controllers implement 
more sophisticated write modes, ele¬ 
mentary Bit Bit capabilities, or other func¬ 
tions that relieve the CPU of some graph¬ 
ics processing. 

Higher Resolutions, More Colors 

The most exciting aspect of all Super 
VGA implementations, however, is Hie 
higher resolutions and the increased 
number of simultaneous colors on the 
screen. The standard VGA can display 
16 simultaneous colors in 640 x 480 
resolution and 256 colors in 320 X 200, 
as described in Figure I. In contrast, a 
typical Super VGA board can do 1024 
x 768 in 16 colors and 640 X 480 in 256 
colors. In ihe near future, a range of 
VGA controllers wall be able to do 1024 
x 768 in 256 colors. And a little further 


down the line, some controllers will 
have the capability of 1280 x 1024 reso¬ 
lution in 16 colors. 

Developments in the monitor mar¬ 
ket make these extended resolutions 
especially important. Multifrequency 
monitors capable of resolutions up to 
1024 x 768 are available today for less 
than $1000, and the price is expected 
to drop even further. 

Planar vs* Packed Pixel Modes 

Before beginning a discussion on Su¬ 
per VGA graphics, a brief summary of 
the basic video memory modes is re¬ 
quired. VGA graphics video modes use 
either planar or packed pixel video 
memory architecture. 

In planar mode, the video memory 
is divided into four separate planes. 
One pixel is defined by 4 bits, 1 bit per 
plane. Eight pixels are defined by 4 
bytes, I byte per plane. Because one 
pixel is defined by 4 bits, 16 colors can 
simultaneously be displayed* 

Normally, only one plane can be 
accessed at one time by the CPU, To 
access another plane, the hardware reg¬ 
isters of the VGA have to lx? repro¬ 
grammed. For rapid fills of a large area 
to a certain color, the VGA can lie 
programmed for 32-bit operation, al¬ 
lowing simultaneous access to all four 
planes. 

In packed pixel mode, only one mem¬ 
ory plane is available. One pixel is 
defined by 1 byte in the memory, yield¬ 
ing 256 simultaneous colors. 

The Developer's Dilemma 

In spite of this revolution and the fan¬ 
tastic opportunities that Super VGA pro¬ 
vides* software development has been 
slow in tapping into the capabilities. 


Very few applications have Super VGA 
support, and only OEM-specific dis¬ 
play drivers (software tied directly to a 
certain VGA controller) can generally 
exploit Super VGA resolutions and ca¬ 
pabilities. 

There are several reasons why soft¬ 
ware development for Super VGA has 
been sluggish. The most important rea¬ 
son is that almost all Super VGA hard¬ 
ware implementations are different from 
one another — a Super VGA controller 
from manufacturer A is usually signifi¬ 
cantly different from manufacturer B's 
because no common hardware or soft¬ 
ware interface exists. 

The software developer has to gather 
a significant understanding of intimate 
details of each Super VGA controller 
(of which there are at least ten at pre¬ 
sent) and each implementation (of 
which there are dozens, maybe hun¬ 
dreds) that he/she intends to support. 
The cost of acquiring this knowledge 
and supporting these disparate envi¬ 
ronments is prohibitively high; software 
developers have shunned Super VGA 
for this reason. 

Non-standard Initialization 

Super VGA implementations differ sig¬ 
nificantly in the video mode initializa¬ 
tion procedure. One piece of mode 
setting code will not work on more 
than one Super VGA board because 
the I/O addresses for the extended reg¬ 
isters required for Super VGA opera¬ 
tion vary from implementation to im¬ 
plementation. In addition, the specific- 
parameters for the registers all depend 
on the VGA controller. 

Another aspect of ibis problem is 
that there is no uniform BIOS support 
for mode initialization across SuperVGA 
products. No video mode number 
scheme exists. A 640 x 480 256 color 
video mode is called 79 in one im¬ 
plementation and 43 in another. Also, 
no standardized mode initialization call 
exists. 

All this means that an application 
cannot program the hardware direcLly 
(because no standard hardware exists), 
nor can it call a BIOS to initialize the 
mode (because a standardized mode 
number doesn't exist, and because no 
standardized calling sequence is estab¬ 
lished). 

Different Windowing Schemes 

Another area where Super VGA imple¬ 
mentations differ greatly is in how the 
video memory is accessed. In the IBM 
PC, a maximum of 128K is devoted to 
the video system. This address space 
[s located between AQ000 and BFFFF 
hex* For compatibility reasons, only 
the 64 K at A0O00 is normally used for 
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Figure 1; PC graphics resolutions and colors 


Resolution 

Colors 

Pixels 

Bits per 
pixel 

Total 

memory 

(bytes) 

Planes 

CPU 

memory 

(bytes) 

640 x 480 

16 

307200 

4 

153600 

4 

38400 

800 x 600 

16 

460000 

4 

240000 

4 

60000 

1024x768 

16 

786432 

4 

393216 

4 

98304 

640x400 

256 

256000 

8 

256000 

1 

256000 

640x480 

256 

307200 

8 

307200 

1 

307200 

800 X 600 

256 

480000 

8 

480000 

1 

480000 

1024x768 

256 

786432 

8 

786432 

1 

786432 


Figure 2: Memory requirements of Super VGA modes 
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Any VGA card can look life a star 
until you see it perform alone 


Get the Premier VGA CAD Card—all the extras without 
extra cost. 

Nowadays, it seems like everybody makes a VGA card, But 
then they charge for software driver updates. Or memory 
modules. Or specialized VGA add-on cards to fill the gaps 
where they come up short in CAD or animation performance. 
Before you know it, you’re up to your slot limits in expensive 
add-ons and workarounds. 

It’s enough to make you want a card engineered for an 
engineer, like the Premier VGA CAD Card. 

With the Premier VGA CAD Card, you get high-resolution 
pass through and video-ready capability. Use the only direct 


connector to Magni’s VGA Producer.™ Enjoy up to 1024 x 768 
non-interlaced support with 512K on-board memory. And 
download free application drivers for die latest versions of 
popular software such as Microstation, Microsoft® Windows 
and AutoCAD® from the Metheus bulletin board. All at less 
cost than mix-and-matching your own VGA And add-on cards! 

Whether you're starting out in CAD and need room to grow, 
or are pushing the limits of your current CAD system and need 
a real CAD card, Premier VGA is the card for you. Get Premier 
VGA and set the stage for professional performance. Call 
Metheus at 1-800-6384842. 

All trademarks and registered trademarks are of their respective companies. 
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cation program: 

1. Information 

2. Hardware setup 


Super VGA resolutions (another video 
hoard in the system might be located 
at BDOQO-BFFFF). 

However, Super VGA video modes 
consume more video memory than is 
available in the CPU address space. 
Figure 2 details typical memory require¬ 
ments of Super VGA modes. As Ls evi¬ 
dent from this table, there has to be a 
mechanism for the CPU to reach into 
the video memory using the 64 K (or 
128K) "window” available in the CPU 
address space. 

Unfortunately, there are almost as 
many windowing schemes as there are 
Super VGA controllers. Some control¬ 
lers have one window into the video 
memory, while others have two. Some 
controllers have separate read and write 
windows, while others allow read/ 
write in both windows. Some control¬ 
lers implement a ' sliding 1 ' windowing 
scheme, whereby a window can be 
placed on any boundary in the video 
memory, while others allow' placement 
of the Window only on a 64K boundary. 

On top of this, the hardware regis¬ 
ters that control the windowing scheme 
are located at different I/O addresses 
and require different parameters. 

Enter the VESA BIOS Extension 

The Super VGA BIOS extension stan¬ 
dard, as defined by the Video Electron- 
ics Standards Association (VESA), in¬ 
tends to remedy the incompatibility is¬ 
sues addressed earlier. The standard 
tries to address all major problems a 
software developer faces when writing 
software for SuperVGA, 

Technically, the VESA BIOS exten¬ 
sion is implemented as an addition to 
the regular video BIOS, accessed 
through software interrupt 10 hex. Stan¬ 
dard video BIOS functions are called 
by placing function numbers in the 
range from 0 to 1C hex, depending on 
the function, In the AH CPU register 
and then generating a software inter- 
nipt 10 hex. To call a VESA BIOS func¬ 
tion, the application would place the 
value 4F hex in the AH register, place 
a function number in the AL register, 
and then generate an interrupt 10 hex. 
Figure 3 describes the VESA BIOS exten¬ 
sion functions. 

The VESA BIOS extension may be 
placed in ROM together with the regu¬ 
lar BIOS, It may also be implemented 
as a device driver, loaded by the oper¬ 
ating system at boot time. Initially, most 
VESA BIOS extensions will be avail¬ 
able as TSR programs. To the applica¬ 
tion, the method of implementation is 
irrelevant; functionally, the BIOS ex¬ 
tension behaves the same. 

The VESA BIOS extension provides 
two fundamental services to the appli- 


Global Information 

To be able to adapt to a specific Super 
VGA environment, an application needs 
several important pieces of informa¬ 
tion, First and foremast, an application 
needs to know whether the specific 
environment is indeed capable of Su¬ 
per VGA resolutions. The application 
also needs to know whether any VESA 
support is available, Tn addition, cer¬ 
tain applications might want to identify 
a specific VGA controller. 

This kind of global information is 
provided by VESA BIOS function 0, 
Return Super VGA mode information. 
Before the application calls this func¬ 
tion, it has to allocate a buffer of 256 


bytes. The VESA BIOS extension will 
fill this buffer with various types of 
information. 

One of the most important pieces of 
information returned by function 0 is 
a pointer to a list of Super VGA modes 
supported by the display adapter These 
video modes can be VESA-defined 
modes as well as OEM-defined modes. 
See Figure 4 for a list of VESA-defined 
video modes. 

Mode-specific Information 

To determine the characteristics of a 
particular video mode, the application 
would then call VESA BIOS function 
1, Return Super VGA mode informa¬ 
tion . Like function O, the application 
has to allocate a 256-byte buffer prior 
to making the function call. 

On return from the function, tile VESA 
BIOS extension will have filled a stme- 


Ttie following functions are defined by the VESA BIOS extension. They are all accessible through 
interrupt 10 hex with AH set to 4F hex. 

Every function returns status information in the AX register. The formal of the status word is as 
follows: 

AL=^ 4Fh: Function is supported 

AL!= 4Fh: Function is not supported 

AH~ OOh: Function call successful 

AH== 01 h: Fu nctilon call fai led 

Function 0 - Return Super VGA Information 

Input: AH=4Fh Super VGA support 

AL=OOh Return Super VGA information 

ES:DI~ Pointer to information block 

Output: AX^ Status 

Ail other registers ere preserved 

The information block has the following structure: 

VgainfoBlock struc 


VESASignature 

db 

VESA’ 

; 4 signature bytes 

VESAVersion 

dw 

? 

; VESA version number 

OEMStringPtr 

dd 

? 

: Pointer to OEM String 

Capabilities 

db 

4 dup(?) 

; capabilities of the video environment 

Video ModePtr 

dd 

7 

; pointer to supported Super VGA modes 


VgalnfoBfock ends 

Function 1 - Return Super VGA mode information 


Input: 

AH=4Fh 

Super VGA support 


AL=Q1h 

Return Super VGA information 


cx= 

Super VGA video mode 


ES:DI= 

Pointer to information block 

Output: 

AX- 

Status 


Ail other registers are preserved 


Function 2 - Set Super VGA video mode 


Input: 


Output: 


AH=4Fh 

AL=Q2h 

BX= 


AX= 


Super VGA support 
Set Super VGA video mode 
D(TD14 = video mode 
D15 - Clear memory flag 

0 = Clear video memory 
1 = Don't dear video memory 

Status 


All other registers are preserved 


Function 3 - Return current video mode 

Input: AH=4Fh Super VGA support 

AL=03h Return current video mode 

Output: AX= Status 

BX= Current video mode 

Alt other registers are preserved 


Figure 3: VESA BIOS extension functions (accessible through interrupt 10 
hex with AH set to 4F hex) 
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turc, allied the ModelnfoBlock^ with all 
relevant information about this video 
mode. See Figure 5 for a description 
of the ModelnfoBlock * 

Mode Attributes 

The first word 06 bits) in the Modeln¬ 
foBlock, tlie Mode At tributes field, speci¬ 
fies several important characteristics of 
the video mode. See Figure 6 for the 
layout of this field. 

lilt DO in the Mode A ttributes field 
specifies whether the mode is supported 
by the present hardware configuration. 
If a particular video mode requires a 
certain monitor, and this monitor is 
presently not connected to the system, 
this hit can be cleared to block access 
to the mode. Applications should never 
try to initialize a video mode whose 
Mode At tributes DO is set to 0. 

As will be evident in the discussion 


later, the VESA BIOS function 0 returns 
a lot of information to the application. 
Some of this information is mandatory, 
some is optional. Bit DJ of the ModeAt- 
tributes specifies whether any optional 
information is available. 

Bit D2 indicates whether the output 
functions (TIT output, set/get pixel, 
scroll window, etc.) of the regular video 
BIOS can be used in this video mode. 
It is not mandatory for a VESA BIOS 
extension to support all or any output 
functions in Super VGA modes. The 
primary reason for this is that high- 
performance applications handle all out¬ 
put themselves anyway, for performance 
reasons. The fact that output support 
consumes a lot of precious memory 
space in a ROM-based implementation 
was also important in making this sup¬ 
port optional. If bit D2'vs cleared, then 
no output support is available. 


Bit D3 specifies whether the mode 
is monochrome ( D3=0) or color (D3=ll 
Bit D4 defines the mode as either text 
mode ( 04^0) or graphics mode (D4=l). 

Window Description 

The characteristics of the windowing 
system are described in the next field 
in the ModelnfoBlock structure. The 
WinAAUrihutes and WinBAttributes iden - 
tify whether window A and B exist and 
are readable or writeable* All Super 
VGA boards capable of resolutions be¬ 
yond 640 x 400 in 256 colors and 800 
x 600 in 16 colors have at least one 
window into the video memory. Appli¬ 
cations can determine the existence of 
a second window by testing bit DO of 
WinBAttributes * 

The WinGranularity identifies the 
smallest address boundary that the win¬ 
dow can be placed upon. In today’s 
Super VGA boards, this varies from 1K 
to 64 K. The Win Size field identifies the 
size of the windows. In a single-win¬ 
dow system, the size is normally 64K, 
while in a dual window system, the 
size is normally 32K. 

The location of the window s within 
the CPU address space is specified by 
the fields Win A Segment and WinBSeg- 
ment. Normally Window A is located 
ac address A0000. If a second window 
is present, it would typically be located 
at A800Q or B0Q00. If the VGA control¬ 
ler implements different read and write 
windows, the second window could 
be located aL the same CPU address as 
the first window. In such a system, a 
CPU read will access the read window, 
while a CPU write will access the write 
window* 

The WinFuncAddr field specifies a 
direct address to the windowing func¬ 
tion (Figure 3, VESA BIOS function 5)- 
The standard way to access the video 
BIOS and the VESA BIOS extension is 
to generate an ini 10 1 However, due 
to the large number of subfunctions 
using ini 10, function dispatching may 
take considerable time. This makes ini 
10 too slow for some graphics opera¬ 
tions, One such time-critical operation 
is changing the w indow ing registers* 
By using the absolute address to the 
function, an application can issue a far 



Figure 4: VESA-defined Super VGA 
modes 


Function 4 

- Save/Restore Super VGA video slate 

Input: 

AH-4Fh 

Super VGA support 


AL=04h 

Save/restore Super VGA video state 


DUOQh 

Return save/restore state buffer size 


GX- 

Requested stales 



D0=Save/restore video hardware state 

D1 -Save/restore video BIOS data state 
D2^Sa ve/restore video DAC state 

D3=Save/restore Super VGA state 

Output: 

AX= 

Status 


BX= 

Number of 64-byte blocks to hold the state buffer 


Ail other registers are preserved 

Input: 

AH=4Fh 

Super VGA support 


AL=04h 

Save/Restore Super VGA state 


DL-01 h 

Save Super VGA video stale 


CX= 

Requested states {see above) 


ES:BX= 

Pointer to buffer 

Output: 

AX- 

Status 


Ail other registers are preserved 

Input: 

AH-4Fh 

Super VGA support 


AL=04h 

Save/Restore Super VGA state 


DL=02h 

Restore Super VGA video state 


CX- 

Requested states {see above) 


E5;BX= 

Pointer to buffer 

Output: 

AX- 

Status 


Ail other registers are preserved 

Section 5- 

CPU Video Memory Window Control 

Input: 

AH-4FH 

Super VGA support 


AL=Q5h 

Super VGA video memory window control 


BH=00h 

Select Super VGA video memory window 


BU 

Window number 



0=Window A 



1 =Window B 


DX= 

Window position in video meory 

Output: 

AX- 

Status 

Input: 

AH=4Fh 

Super VGA support 


AU05h 

Super VGA video memory window control 


BH=01 h 

Return Super VGA video memory window 


BL= 

Window number 



0=Window 

1 -Window 

Output: 

AX- 

Status 


DX= 

Window position in video memory 
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call directly into it, speeding up execu¬ 
tion considerably. 

Optional Information 

Only a portion of the ModelnfoBlock 
is obligatory information. The other sec¬ 
tion is optional and is provided if the 
specific mode is nonstandard. None 
of the modes defined by VESA (see 
Figure 4) require the optional informa¬ 
tion. For an OEM-specific mode, how¬ 
ever, the VESA BIOS extension needs 
to inform the application alx>ut items 
such as screen resolution, number of 
planes, and bits per pixel. 

Refer to the VESA BIOS extension 
specification for information on how 


to use these optional fields. 

Video Mode Initialization 

One main objective of the VESA BIOS 
extension is to help applications set 
up video modes. This is realized through 
VESA BIOS Function 2, Set Super VGA 
video mode. The application simply 
places the video mode to be initialized 
in the BX register and calls this func¬ 
tion. Normally, the video memory will 
be cleared, but if the application sets 
bit D15 of the BX register prior to call¬ 
ing the function, the memory will be 
preserved. 

VESA mode numbers are 15 bits wide 
(see Figure 4), OEM-defined mode num¬ 


bers are 7-bits wide and are imple¬ 
mented as a subset of VESA-defined 
modes. Due to this numbering conven¬ 
tion, VESA modes, OEM-specific modes, 
and regular VGA modes can be initial¬ 
ized by using VESA BIOS Function 2, 

If an application needs to know the 
present video mode, it would call VESA 
BIOS Function 3, Return current video 
mode. For applications (especially TSR 
programs) that need to interrupt other 
programs, the VESA BIOS Function 4, 
Save/Restore Super VGA video state\ 
comes in handy. 

The Windowing Function 

Finally, the VESA BIOS extension pro¬ 
vides a mechanism to control the posi¬ 
tion of the video memory windows. 
This is handled by Function 5, CPU 
video memory window control To re¬ 
position a window into the video mem¬ 
ory, the application simply places the 
window position in the DX register, 
the window number ( 0 for Window A 
and 1 for Window B) in the BL register, 
and calls Function 5, 

The window position is not speci¬ 
fied as a byte offset, but rather in terms 
of granularity units. As stated earlier, 
the window granularity expresses the 
smallest boundary on which the win¬ 
dow can be placed. Today's SuperVGA 
boards have granularities between 4K 
and 64 K. Thus, if the granularity is 16 K t 
and the application wants to position 
the window at 64K, the window posi¬ 
tion is 64/16 = 4 granularity units. 

Conclusion 

The VESA BIOS extension provides all 
necessary information and programming 
support to Super VGA applications. For 
the first time, it ts possible to develop 
generic graphics software, tapping into 
the exciting capabilities of Super VGA. 

However, just because the VESA BIOS 
extension has made it possible to write 
such applications doesn't mean it will 
be trivial. Most of the complexity in 
dealing with Super VGA stems from 
managing windows into the video mem¬ 
ory . Any one a I read y fa m i l i a r wi th writ- 
ing software for one Super VGA board 
should have no difficulty in program¬ 
ming others using the VESA BIOS ex¬ 
tension. 


For More Information 

Video Electronics Standard 
1330 S. Bascom Ave., Ste, D 
San Jose, CA 95128-a502 
408-971-7525 


DDJ 

Vole tor your favorite feaiu re/a r tide. 
Circle Reader Service No. 12. 


Field name 

ModeAttributes 

WinAAitrabutes 

Win B Attributes 

WinGranularity 

WtnSize 

WinASegment 

WinBSegmenl 

WinFuncPir 

BytesPerScanLlne 

XResolution 
V Resolution 
XCharSize 
YCharSize 
NumberOf Planes 
BitsPerPixel 
NumberOf Banks 
MemoryModel 
BankSize 


Size 

word 

byte 

byte 

word 

word 

word 

word 

doubleword 

word 

word 

word 

byte 

byte 

byte 

byte 

byte 

byte 

byte 


1 mandatory information 


Description 

mode attributes 
window A attributes 
window 8 attributes 
window granularity 
window size 
window A start segment 
window B start segment 
pointer to window Function 
bytes per scan line 
extended information 
horizontal resolution 
vertical resolution 
character cell width 
character cell height 
number of memory planes 
bits per pixel 
number of banks 
memory model type 
bank size in kb 
| optional Information 


Figure 5: Mode information block structure 


15 

14 

13 

12 

11 

10 

9 

e 

7 

6 

5 

4 

3 

2 

□ 

M 


V 


Reserved 


Mode type 




0 = text mode 
1 = graphics mode 


Monochrome/color - 
0 - monochrome 
1 = color 


BIOS output - 

functions supported 
0 = no 
1 = yes 


L 


Mode supported 
in hardware 
0 = no 
1 = yes 


Extended information 
available 
0 = no 
1 = yes 


Figure 6, Mode attribute field 
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SVS - Legendary Compilers. 

The Performance Benchmark. 


Call SVS for 
optimizing compiler. 
415 - 572-8800 U 




SVS runs on atI of our 
customers' machines... 

386, 486 68030, WEITEK.... J 


i SVS benchmarked fastest in MIPS magazine. § 


t Runs now on DOS Extenders, UNIX and XENIX. ^ 


t Call FORTRAN math routines from C...great interoperability, p 


SVS Language Systems 


i Use SVS DBG to check 
the fully optimized code, p 


Legendary Compilers. 

SVS €, SVS Fortran, SVS PASCAL, 
SVS Basic-PLUS, SVS DBG. 
Legendary Systems. 

In worldwide distribution for over 
ten years, SVS Language Systems are 
licensed at over 250,000 UNIX? sites. 
Legendary Portability* 
Applications using SVS Language 
Systems use identical source code 


regardless of the platform. Portability 
is easy. There is no recoding, simply 
use the optimising SVS compiler on 
the target system, A single develop¬ 
ment effort can be leveraged across 
a broad range of vendors, processors 
and systems. 

Legendary Support* 

SVS provides all levels of customer 
support from TRIX^ our real-time 


electronic conferencing system, to 
Language updates and standards con¬ 
formance. We will GUARANTEE our 
response time to your requests. 
Legendary Versatility* 

SVS supports a broad range of UNIX 
and extended DOS based systems: 
ARIX, Compaq, Motorola, Prime, 

Sun, UNISYS, Bull HN, 1BM/ADC NCR, 
Sequent, T.L, SCO/Xenix, PC/ix. 


1710 South Amphlett BlvdSuite 100, San Mateo, CA 94402 415- 5^2-8800 


Silicon Valley software 

TR!l) SOFTWARE SYSTEMS CORPORATION 


CIRCLE NO, 46 ON READER SERVICE CARD 
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Cruising 
with TopSpeed 

A full-featured toolset is 
the real value in this C compiler 


Alex Lane 


I t is fashionable in some circles to 
yawn upon bearing that a new C 
compiler lias hit the market. Such 
folks see the C world as divided 
into two main camps — the Micro- 
softs and the Turbos — with a smatter¬ 
ing of fanatics representing an insig¬ 
nificant fringe. That fringe, however, 
has lately succeeded in whipping up 
the C market, the result being a lively 
free-for-all as new arrivals such as Wat- 
com, Zortech, and now TopSpeed C 
attempt to prove their worth to pro¬ 
grammers. Readers, familiar with the 
TopSpeed name, will associate it with 
a popular Modula-2 compiler and a 
recently introduced Rascal compiler, mar¬ 
keted by Jensen & Partners Interna¬ 
tional JPL a company established in 
1987 by a group of former Borland 
employees, is a relatively small com¬ 
pany with unquestionably large vision. 
They intend to develop an integrated 
multilanguage environment that will let 
programmers seamlessly mix and match 
routines from a broad spectrum of lan¬ 
guages, including ISO Pascal, C, C++, 
Modula-2, and Ada. What JPI in effect 
proposes to do is to link each language 
dynamically into the system as an over¬ 
lay at run time, thus allowing each 
language compiler to use the same op¬ 
timizing code generator. If TopSpeed 
C is any indicator, JPI has its sights set 
on a worthwhile goal. 


Alex is a knowledge engineer for Tech¬ 
nology Applications Inc , in Jackson¬ 
ville* Florida . He can he reached on 
BIX as a Jane or through MCI mail as 
ALANE. 


What You Get 

I reviewed the TopSpeed C t Version 
1.02, Extended Edition, which is basi¬ 
cally the standard package (comprised 
of an optimizing 100 percent ANSI C 
compiler and high-speed linker, an auto¬ 
matic make facility, an editing environ¬ 
ment, and source-level debugger) com¬ 
bined with the TopSpeed C Tech Kit, 
which provides enhanced functional¬ 
ity in the form of library source code, 
Windows support. DOS dynamic link¬ 
ing, profiling, and post-mortem debug¬ 
ging, among other features. The stan¬ 
dard TopSpeed package consists of 
seven diskettes and nearly three inches 
of paperback documentation, consist¬ 
ing of a user manual, a language refer¬ 
ence, a library reference, and a lan¬ 
guage tutorial. The Tech Kit comes on 
an additional four disks and has sepa¬ 
ra te dc >c u me ntation. 

Finding Files 

I dread installing software that needs 
to use DOS environment variables to 
find files on my disk. For one thing, 1 
only have so much DOS environment 
space; for another, I often find that two 


Figure 1: A sample redirection file 


different packages use the same DOS 
environment variable name in different 
ways, and that no amount of fiddling 
with SET statements shall allow the 
twain to meet on a consistent basis. If 
you have two or more C compilers 
installed on your hard disk, you prob¬ 
ably know what I mean. 

If you want TopSpeed C to use DOS 
environment variables, you can so spec¬ 
ify by using the /y flag from the com¬ 
mand line* but why bother? I took an 
immediate liking to TopSpeed's redi¬ 
rection file feature, which acts as a sort 
of private environment. A sample redi¬ 
rection file, TSJIED, is reproduced in 
Figure 1. The syntax is similar to that 
of DOS paths. The first line indicates 
that all KABOOOOM.* files are found 
i n t he di recti >ry C: \ KABOOOOM. Analo¬ 
gon sly, all other *.C files may be found 
either in the current directory (denoted 
by the 7), or in C:\TS\EXAMPLES, 
C:\TS\ SRC, or in DA FRAC \PROGS. 
The remaining lines are self-explana¬ 
tory, except perhaps for the line that 
refers to A A files that are TopSpeed 
assembler files. 

By editing T5.REG, then automat i- 


KABOOOOM.* - 

C:\KABOOOOM 

*.C 

- - 

G:\TS\EXAMPLES; C:\TS\SRC; D:\FRAC\PROGS; 

7PRJ 

- 

C:\TS\PRJ; C:\TS\EXAMPLES; 

AH 

= t ; 

C:\TS\INCLU DE;C;\TS\EXAM PLES: D:\FRAC\PROGS; 

\A 


C:\TS\LIB; C:\TS\EXAMPLES; C:\TS\SRC 

*.OBJ 


C:\TS\OBJ; C:\TS\LIB; 

\LIB 


G:\TS\LIB; D:\FRAC\PROGS; 

*.DOC 


C:\TS\DOC; 

IS.RED 

= ■; 

C:\TS\SYS; 
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cally saving and reloading it, you can 
change the lilt search (and storage) 
behavior of the environment cm-1be¬ 
lly. If, despite your best intentions, you 
repeatedly end up with all your *.c, 
*.obj, *,h, and Texe files in one giant 
directory, this feature is for you. 

Integrated Development Environment 

The cornerstone of the integrated envi¬ 
ronment is, of course, the editor. Out 
of the box, Tops peed’s editor is config¬ 
ured to use the WordStar command 
set. You can change part or all of that 
by editing a configuration file. 

Actually, the TopSpeed configura¬ 
tion file TSCFG.TXT affords the user 
quite a bit of control over not just the 
editor but the TopSpeed environment 
in general. The file is a 33 K ASCII text 
file that defines the menu structure, 
every menu option, the editor com¬ 
mands, a nd even compilation error mes¬ 
sages used by the TopSpeed system. 
This is the file you edit if you want to 
make the environment editor act more 
like, say, Brief than WordStar A disk 
file explains how to make the changes, 
and after only a few minutes, 1 was 
able to change the main menu format 
from vertical to horizontal and to de¬ 
fine the Ctrl-F10 keychord as a way to 
directly access the optimization menu. 
While there are many things you can 
change, there are others (such as an 
inability to extend the undo feature 
past one event) you have no control 
over. Once you’ve finished making 
changes, you can incorporate them into 
the TopSpeed environment by running 
the TSCFG.EXE program. 

Although the editor handles up to 
ten windows (0-9), you'd normally 
edit in windows #1 through #9, be¬ 
cause window #0 is a special window, 
called the "error editor window/’ This 
window comes into play after errors 
and warnings are found during compila¬ 
tion of a source file. The flawed file is 
displayed in this window with the cur¬ 
sor positioned at the first error, and the 
corresponding error message appears 
at the bottom of the window. Pressing 
F8 moves you forward to the location 
of the next error; F7, back to the previ¬ 
ous one. 

When you exit from the TopSpeed 
environment, the system remembers the 
contents and status of each window 
and reloads the same files the next time 
you enter the environment. You can 
alternatively start with a "clean slate" 
by supplying the /n option on the com¬ 
mand line. Another nice touch is a 
prompt reminding you to save your 
work when you call up the source- 
level visual interactive debugger (VID) 
from the TopSpeed menu. 


There are a number of useful op¬ 
tions available under the Utilities menu, 
including an ASCII table, a program¬ 
mer's calculator that works in decimal, 
hex, or binary, and a window that lets 
you see the scan codes for keyboard 
keys. There is a multiple-file string 
search capability that works a bit such 
as grep, albeit without the powerful 
regular expression capabilities of that 
Unix utility. Other options include the 
ability to print files, to view files as data 
(that is, in hex), and to display system 
information. "System Info" shows the 
current date, time, and directory, the 
names of the files being edited in the 
TopSpeed windows, and a summary 
of free space on all disks. Be prepared 
to wait for this report if you have a 
CD-ROM disk attached to your system, 
for even though there is no “free space" 
available on a CD-ROM, there 1 is no way 
to tell TopSpeed to ignore the drive, 
which gets interrogated in turn along 
with the other drives in your system. 

There are a number of other features 
1 found useful in this environment, too 
many in fact to list. Particularly note¬ 
worthy to me. however, are the ability 
to have up to nine generations of 
backup copies (I have mine set to 3), 
and the ability to record, load, save, 
and playback keystroke macros. The 
instructions for recording a macro w ere 
dear, and it took only a couple of 
minutes for me to create a macro that 
toggled all optimization on and off. 
About the only criticism I have of the 
editing env ironment is the lack of mouse 
support and the lack of LinLx-style regu¬ 
lar expression parsing (as in Brief, for 
example), but those are relatively mi¬ 
nor annoyances. 

Compiling 

While the editor and its features form 
an important part of the TopSpeed C 
package, you can’t forget that this is, 
after all, a C compiler, and the worth 
of the package ultimately hinges on 
how well It compiles code. 

To help put TopSpeed C through its 
paces, I worked with a file that had 
been written in Microsoft C for a fairly 
simple-minded game of deduction. The 
playing held" for this game is a 9 x 15 
grid that contains some number of hid¬ 
den mines, and the player uses the 
numeric keypad to "walk" a happy- 
face character through this mine field 
to a goal. To give the player a fighting 
chance, the number of mines in adja¬ 
cent squares is displayed as the player 
moves from square to square, thus al¬ 
lowing the player to deduce the loca¬ 
tion of the mines without “stepping" 
on them. To make life easier, the loca¬ 
tion of mines may be marked by press¬ 


ing M and an appropriate key on the 
numeric keypad. In addition, if an /s 
parameter is passed on the command 
line when the program is invoked, the 
program worit let the player step on 
such marked squares. Finally, typing ? 
at the start of the game causes the 
program to start playing by itself until 
it either gets to the goal or is unable to 
proceed further through the grid. Aside 
from being fun to play, the file 
KABOOOOM.C (see Listing One, page 
109) is just under 1000 lines in length 
and offers a substantial chunk of source 
code for the compiler to process. 

The first attempt to compile the code 
resulted in a couple of errors. The first 
error, in the function Display Cell, had 
to do with a failure to read an embed¬ 
ded ASCII 2 (the happy-face) in the 
source code. The TopSpeed editor did 
not read this character, resulting in the 
assignment Char = and a subse¬ 
quent error. Changing the line to Char 
= 2; fixed the problem. 

The second error came in a line of 
the DisptayChar function, which read: 
FP_SEG(cPos) = OxObOOO; 

While a legitimate statement in Mi¬ 
crosoft C, this use of FP_SEG( ) gener¬ 
ated a “left operand ol assignment must 
be a modifiable lvalue" error message 
from the TopSpeed compiler. Pressing 
FI for help brought up an explanation 
of the message, which is comfortably 
verbose as it is. I moved off the offend¬ 
ing line and again pressed FI, and 
shortly was reading the help screen 
associated with FP_SEG( ). It referred 
me to MK_FP( ), which permitted me 
to replace the offending line (and the 
line after it) with: cPos = MK_FP( 
QxObSOO , ( (x+y*80) « 1)); which el i mi - 
nated the problem. A quick check 
showed that Turbo C 2.0 also required 
the MK_FP( ) syntax in order to com¬ 
pile without error. 1 later learned that 
the FP_SEG macro is defined differ¬ 
ently for the Microsoft and TopSpeed 
compilers, which explains the failure 
to compile. 

Once tlie bugs were corrected, the 
initial compilation pass w ith TopSpeed 
C took about 13 seconds on my 16- 
MHz ARC 386i computer, and optimi¬ 
zation took another 18 seconds or so. 
With all optimizations turned off (there 
are nine forms of optimization, includ¬ 
ing optimization for Lime and space as 
well as constant, jump, peephole, loop, 
and alias optimization), the compile 
time was cut down to 28 seconds over¬ 
all. This compared favorably with a run 
through Microsoft C 5.1, which took 
37 seconds to compile without optimi¬ 
zation, yet was slower than Turbo C 
2.0. which compiled and linked the 
program in about 13 seconds. 
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An Actor Oriented 
Environment 
for PDP Specification 



ANSpec is a development environment 
for parallel distributed processing (PDP) 
models including artificial neural systems, 
ANSpec is based on recent developments in 
computer science including actors, objects, 
polymorphism, operator overloading, and ap¬ 
plicative programming. With ANSpec you can 
specify connections! systems which capture 
the full spectrum of inherent concurrency in 
an application from coarse grained to ultra- 
fine grained processing architectures. 

Platforms supported for ANSpec include 
PC/AT compatibles with extended memory, 
MAC-II t llx, SE. Pius and Sun/3,4,3861 t Sparc 
and SAIC's Delta If Floating Point Processor. 
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l ran the compiler from within the 
editing environment, hut you can also 
run Tops peed C from the command 
line, w here a comprehensive set of com¬ 
mand-line options give the programer 
complete control of compilation and 
linking, hi fact, there are four ways to 
set compiler options in the TopSpeed 
C compiler: From a menu, from the 
command line, via directives in 
Top Speed's make facility, and by in¬ 
cluding pragmas in the source code. 
One very topical option in the com¬ 
piler Is die ability to check for ANSI 
compatibility, JPl has made a point of 
maintaining 100 percent conformance 
to the ANSI C definition, and now that 
the seemingly intemiinuhle deliberations 
of the ANSI C committee have appar¬ 
ently come to a close, this feature should 
be a point in TopSpeed Cs favor. 

Making it With Project Files 

TopSpeed s project files make it easy 
to admit to hating traditional make prt>- 
grams. Like its traditional counterpart, 
TopSpeed v s Make uses a text file (called 
a “project file”) to figure out what kind 
of file to produce with what objects 
and libraries, and using which memory 
model, Project files are collections of 
"directives" that, in addition to the usual 
specification of object modules, librar¬ 
ies, and so on, establish various com¬ 
piler and linker options (such as inclu¬ 
sion of debugger information in the 
.EXE file), override options for specific 
files or groups of files, and specify what 
programs to run (if any) after the make 
process is complete. You could, for 
example, copy the .EXE file to a disk¬ 
ette every time you compiled and linked 
the source code. In short, the project 
file is the mechanism by which 
TopSpeed source code is transformed 
into executable files. 

Twc) va 1 uable teatures aid in tlle link 
process. Type-safe linking involves catch¬ 
ing function calls made with the wrong 
parameter types. You will bless this 
feature the first time it saves you from 
calling an external function with the 
w rong parameter types. The technique 
of smart linking helps keep executable 
file size down and reduces the com¬ 
plexity associated with maintaining li¬ 
braries. When you link a program, 
TopSpeed will only include those rou¬ 
tines that are referenced in the code, 
leaving all the other routines out of the 
executable file. Strangely enough, this 
means that sometimes you must make 
an extraneous reference to a variable 
in order to make sure certain routines 
are linked into the .EXE file. A case in 
point is the need to include a line in- 
cludePMD = /; in one of the functions 
that handles critical program errors so 


that TopSpeed loads the appropriate 
routines to perform a post-mortem 
dump in case the program bombs. 

Debugging 

The VID is a full source-level symbolic 
debugger that uses overlapping win¬ 
dows in an interactive environment. 
Like the parent TopSpeed environment, 
there is no mouse support in VID, 

VTD is easy to run from the TopSpeed 
environment, which wisely prompts you 
to save your files before it swaps itself 
to disk, leaving room for your program 
and VTD. To use VTD, you need to 
generate VTD information during com¬ 
pilation and a .MAP file during the link 
process. All required files are found 
using the redirection file, if necessary. 

All the usual debugging features are 
here. You can set and clear breakpoints, 
create “sticky” breakpoints, examine 
different types of variables, find proce¬ 
dures, evaluate expressions, all the usual 
stuff. While not as powerful as. say, the 
Borland Turbo Debugger (there is no 
equivalent to the Inspect command, 
for e x a nip le, w h i c h si u >ws recc>rd strue- 
ture, or the CPU window, which shows 
registers, memory, and disassembled 
code all at once) the VI1) is neverthe¬ 
less a competent piece of software that 
is able to do the job. 

TechKit 

The TechKit is what distinguishes the 
Extended Edition ($395 list price) from 
the Standard Edition ($ 195) of TopSpeed 
C. What you gel for your money is a 
collection of programs, files, and utili¬ 
ties that add functionality to TopSpeed 
C It includes support lor Windows pro¬ 
gramming and dynamic link libraries 
( DLLs), including DLLs that can he used 
under DOS. (A DLL is an OS/2 innova¬ 
tion that allows applications to share 
common data and code by linking li¬ 
brary routines at run time.) 

A major piece of the Tech kit is the 
source code to the TopSpeed libraries. 
This collection of files fills over 1.5 
Mbytes of disk space. The code is de¬ 
signed not only for use by TopSpeed 
C, but also for use with other TopSpeed 
languages. Many of the files are written 
in TopSpeed's assembler language, 
which makes for speedy routines, but 
also requires you to learn a new dialect 
of assembler. 

The TopSpeed Assembler attempts 
to gain in simplicity and speed by deviat¬ 
ing from "standard” 8086 assemblers 
in several ways. For example, die lexi¬ 
cal structure of the assembler is de¬ 
rived from Modula-2, memory oper¬ 
ands and segment overrides must al¬ 
ways be explicitly stated, and there are 
no macros used in the language. While 
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I can understand JPI’s reason for doing 
it this way, 3 don’t look forward to 
Ix j a>mi ng fami 1 iar with yet a nt >ther a,s- 
sembler scheme. 

An interesting utility included in the 
Tech Kit is WATCH, which lets you spec¬ 
ify groups or individual DOS functions 
to monitor during program execution. 
I ran the program and specified the 
date/time functions for monitoring, with 
output to he sent to my printer (as 
opposed to ilie screen or disk file). 
When l ran KABOOOQA1 EXE, a brief 
report was sent to the printer when the 
program called DOS to get the time 
during the initialization phase. The Alt- 
backspace key chord toggles WATCH 
on and off, and in order to change the 
scope of the DOS functions monitored, 
1 found ii necessary to unload WATCH 
and then reload it from scratch. {If you 
send WATCH'S output to the screen, 
however, you are able to interact more 
with the program (setting and clearing 
functions to monitor), albeit at the ex¬ 
pense of interfering greatly with the 
screen.) WATCH, of course, will not 
work if the program it is monitoring 
does not use DOS to accomplish its 
ends. 

Other pieces of the TechKit aid in 
the debug and streamline process. The 
post-mortem debugger was undoubt¬ 
edly created for those whoVe wished 


their bug-ridden programs could leave 
some indication behind them of what 
went wrong before they exit to never- 
never land. This feature is set by in¬ 
cluding the PMD.H file and referencing 
the includePMD variable in the source 
code. Should anything go wrong and 
a critical error function is called, your 
program creates a file that details the 
state of the system just before lights 
out. This file can be examined using 
the VID, 

Eve always gritted my teeth when 
sitting down to work with a profiler, i 
but I found the TopSpeed TSPROF pro¬ 
filer easy to use. Ail you need to use 
TSPROF is a MAP file, which is created 
when the program is made, I ran the 
profiler for KA BOOCOM and found 
that over half the program's time is 
spent executing DOS routines, nearly 
half the program's time is spent in the 
BIOS, and only three percent or so of 
the time is in the code. 

Conclusion 

Working with the TopSpeed C com- i 
piler was a wholly pleasant experience. 
The advantage of having the file redi¬ 
rection and project file features are alone 
almost worth the price of admission, 
and the overall flexibility of the system 
is a big plus. Though it remains to he 
seen whether jPt will be able to sue- I 


cessfully market the idea of a common 
programming environment with plug-in 
language modules. TopSpeed Ccertainly 
deserves to be a contender in the fight 
for a share of the C compiler market. 

Acknowledgments 

The author would like to thank Tho¬ 
mas D. Eldredge II for the use of his 
source code for KABOOOOM.C Tom’s 
program represents an enhancement 
of a game called RELENTLESS LOGIC 
by Conway, Hong, and Smith, which 
was found on the RBBS-IN-A-BOX CD- 
ROM. 


PRODUCT INFORMATION 

TopSpeed C 

Jensen & Partners International 
1101 San Antonio Rcl, Ste. 301 
Mountain View, CA 94043 
Price: 

Standard Edition $199 
Extended Edition $395 
OS/2 Edition $495 
Requirements Extended Edition - 
IBM PC or compatible, DOS 2.0 or 
later, 64OK RAM. Hard disk recom¬ 
mended, 

DDJ 

(Listing begins on page 109-) 

Vote for your favorite feature/articte. 

Circle Header Service No. 7. 


A Comprehensive Resource for Every C Programmer 


Graphics Programming in C 


by Roger T. Stevens 

Everyone wants something different in 
their graphics package. Graphics Pro¬ 
gramming in C, which details the fun¬ 
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best solution. All the information you 
need to program graphics in C, 
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in this 600+ page book. 
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ures, includes a complete description of 
how to put together a graphics library 
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Complete the picture with 
proven, reliable resources. 

Q Windows: multiple, overlapping, virtual, 
hordered, borderless, scrolling, printing, 
hiding* showing, moving, zooming, pop¬ 
up, pull-down, cursor less, scrollbars... 

U Data entry: Forms, fields, validation, for 
matting, panning, save, abort, pre/post¬ 
function. auto-blank, auto-advance, 
select from list... 

□ Help: context sensitive* pop-up, default, 
key-word highlight.., 

□ Menus: multi-level, Lotus, Mac, 
separators, blank items, unavailable 
items... 

U Keyboard: function keys, jump to func¬ 
tion, translation, programmable handler, 
keyboard idle function... 

□ Text editor : notepad, word wrap, jus¬ 
tify, search, insert, delete, page-up, page- 
down... 

J Video: auto-dclect, MDA. CGA, LG A, 
VGA, 25/43/50 line, programmer 
definable... 

J General: environment variables, com¬ 
mand line arguments, date/time math,,. 

□ Library source included free! 

□ Free support via phone and BBS 

j Portable: versions for DOS, OS/2, 

UNIX, Xenix. VMS 

□ Options: VCScreen—interactive window, 
form, menu, code generator. Vitamin C 
on-line documentation. 
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in data windows— 
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user interface. Applications that arc easier 
for you to write and for end-users to utilize. 

Simple C function calls unleash 
Vitamin C's powerful line-up. Windows, 
data entry, menus, help—it’s all here—no 
extra mod ules to buy. Li brary source and 
free tech support arc included—standard! 

Veteran or beginner, you'll get maxi¬ 
mum power with minimum effort from 
Vitamin C's high level functions. Lower 
level routines offer full control and make it 
easy to refine your design. 

Unrivaled versatility makes you more 
p rod uct i ve and m o re co mpet i t i ve. In fact. 
Vitamin C's open-ended design provides 
virtually limitless customization potential— 
even without modifying the source. Plus, 
Vitamin C is the perfect front-end for your 
DBMS or other function library. 

Advanced features like programmer 
defined functions before/on-exit/after-exil 
for each Held/menu/menu-item complete 
the picture. 

Top it off with comprehensive printed 
documentation, no royalties, and our 30- 
day money back guarantee and you have 
more than a function library—you have 
solutions—you have Vitamin C! 


Bov 112097 Carrollton, Texas 75011 


Vitamin C: S225. DOS: $345. OS/2: Call for Unix, 
Xenix, V MS. Vitamin C On-line Reference; $50. 
Requires the Norton Guides Engine. VCScreen: $149. 
Shipping: Ground, $3: 2-day air, $6; Overnight. $20: 
Foreign. $30, Visa, MasterCard* American Express. 

Alt funds must be U.$. funds drawn on a U.S. bank. 
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PROGRAMMER'S WORKBENCH 



Neural Networks and 
Image Processing 


Finding edges only a human can see 


Casimir C. "Casey" Klimasauskas 


O ne of the key problems fac¬ 
ing the machine vision in¬ 
dustry is how to detect spe¬ 
cific features in an image. It 
turns out that even finding a 
simple feature such as an edge can be 
difficult, if not impossible. Even though 
a person looking at a video camera 
image on a monitor can readily see the 
boundary between two objects, it may 
not be so easy to find it with an algo¬ 
rithm. Researchers studying how the 
eye preprocesses information for the 
brain use the term "early vision” for the 
function of the eye that assists in pat¬ 
tern recognition. We can use insights 
from research in early vision to solve 
the problem of edge detection by com¬ 
puter. 

This article presents an engineering 
approximation of early vision, written 
from the perspective of an engineer 
investigating useful applications of neu- 
rally inspired technology. Although the 
techniques discussed here were sug¬ 
gested by the processes of the human 
eye, they are not intended to be bio¬ 
logically accurate, nor is the solution 
intended to be biologically plausible. 
The architecture of the edge detection 
system presented here is the empirical 


Casimir C. "Casey" Klimasauskas is 
thefounderofNeural Ware Inc., a supplier 
ofneu mi -network development systems 
and services. Prior to that he worked 
extensively in machine vision and ro¬ 
botics. He can be reached at Penn Cen¬ 
ter West IV-227, Pittsburgh, PA 15276; 
412-787-8222. 


result of exploring many blind alleys 
and dead ends. For this reason, some 
of the assumptions and function values 
used here may seem somewhat arbi¬ 
trary. Their only justification is that they 
worked. 

The edge enhancement system pre¬ 
sented here can lie implemented in 
various ways, using different technolo¬ 
gies. This article presents two imple¬ 
mentations in software (one using the 
C language and the other using Lotus 
1-2-3) and also describes a third im¬ 
plementation using commercially avail¬ 
able image processing hardware and 
software. 



Figure 1: effect of a processing ele¬ 
ment on its neigh hots. A “+ " near a 
processing element indicates that the 
center processing element in the dia¬ 
gram will exc ite it if it is excited A ” 
near a processing element indicates it 
will be inhibited if the center process¬ 
ing element is excited 


A Logical Edge Enhancement Model 

You might think of the receptive sur¬ 
face of the eye as an array or grid of 
photoreceptive dements. Light from the 
outside world impinges on this photo¬ 
receptive array and provokes output 
from each of the array elements. The 
output of each of these photoreceptors 
is passed on to another layer of corre¬ 
sponding neurons that work together 
to enhance the image. 

For purposes of this article, we w ill 
call our two-layer network the edge 
enhancement system (EES), Figure I 
shows the effect of one of the EES 
processing elements. The connections 
are shown only from the processing 
element in the center of the array, This 
processing element excites its nearest 
neighbors (shown by near the pro¬ 
cessing elements) and inhibits those a 
little further away (shown by — ” near 
the processing elements). The actual 
strength of Lhe excitation or inhibition, 
as a function of distance from the cen¬ 
ter, is shewn in Figure 2, When plotted 
in three-dimensions, with the magni¬ 
tude of the excitation or inhibition as 
the Z-axts, the resulting shape looks 
like a Mexican hat. For this reason, it 
is sometimes called a "Mexican hat func¬ 
tion" (MHF) or “oncenter off-surround” 
The effect of the Mexican hat function 
is similar to that of a standard image 
processing filter known as a "differ¬ 
ence of Gaussians.” 

The connections are shown only for 
the center processing element in Fig¬ 
ure 1, all the other processing elements 
are connected in a similar fashion. 
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The EES processing element (shown 
in Figure 3) computes an internal acti¬ 
vation value by computing the weighted 
sum of the outputs of its neighl>ors and 
the weights connecting them. This in¬ 
ternal activation value is then trans- 
formed by a nonlinear transfer func¬ 
tion (such as the clamped linear one 
shown) to produce an actual output. 
The clamped linear transfer function 
was found to work best after sigmoid 
and hyperbolic tangent transfer func¬ 
tions were tried and found not to work. 
Notice that the current output of a pro¬ 
cessing element is fed back onto itself 
as part of the input for computing its 
internal activation. 

Readers familiar with neural-network 
types will recognize the EES array of 
processing elements described as a kind 
of feedback neural net, (similar to a 
Hopfield network, but with a fixed pat- 
lem of in ter-connections). The connec¬ 
tions are such that each processing ele¬ 
ment is trying to decide if it is on an 
edge or not. When this constraint is 
satisfied, the processing elements reach 
a stable output state. 

In operation, the outputs of the re¬ 


ceptor array are passed on to the EES. 
The initial values of each of the ele¬ 
ments in the EES are equal to their 
corresponding values in the receptor 
array. After initialization, the EES goes 
through several iterations. During each 
iteration the processing elements ob¬ 
tain inputs from their neighbors (either 
excitatory or inhibitory) as well as from 
their current state. From these inputs, 
they compute a new output transformed 
through some nonlinear function. In 
the eye, these processes evolve as a 
dynamical system obeying a set of con¬ 
tinuous differential equations defined 
by tire synapses connecting them. 

An EES Engineering Approximation 

To develop a good engineering ap¬ 
proximation, we need to be able to 
implement the EES inexpensively and 
efficiently. This section looks at tech¬ 
niques for accomplishing this with read¬ 
ily available off-the-shelf image pro¬ 
cessing hardware and software. The 
two principal image processing tech¬ 
niques discussed here arc convolution 
and look-up tables. 

Convolution is a common and pow¬ 


erful technique for filtering images. Very 
simply, a convolution is a specially de¬ 
signed matrix (or filter) that is com¬ 
bined together with a portion of an 
image to compute a transformed pixel 
value. The filter is centered at each 
pixel in the initial image and the “con¬ 
volution 3 ' of the filter and the image 
beneath it is computed. The result is 
the transformed value of the center 
pixel. The matrix is then moved one 
pixel to the right and the transformed 
value of the next pixel is computed. 
When the filter has been applied, cen¬ 
tered at each pixel in the initial image, 
the resulting transformed image is com¬ 
plete. This is shown in Figure 4. 

The convolution of filter and image 
is arrived at by computing the pair¬ 
wise product of corresponding elements 
of the filter and the underlying portion 
of the image and summing them to¬ 
gether Notice that this is the same as 
computing the internal activation of the 
EES processing element shown in Fig¬ 
ure 3. This means we can implement 
the EES neural net by using standard 
image processing hardware that sup¬ 
ports convolution. 


Excitation 



Figure 2: Impact of a processing element on its neighbors. 
As the distance from the processing element in the center of 
the diagram increases, it excites its nearest neighbors. As the 
distance increases r the excitation turns to inhibition, and 
finally all effects cease. This curve is sometimes called a 
"Mexican Hat Function " or Difference of Gaussians" 
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Figure 4: Operation of a two-dimensional convolution. The 
3 x 3 filter is laid over the initial image, centered at a 
particular pixel. The value of the matrix is multiplied by the 
pixel value just beneath it. The result of these pair-wise 
products are summed together to form ihe transformed pixel 
value in the transformed image 



Figure 3.* Details of a single-processing element in the Edge 
Enhancement System . Ihe ■'+" symbols indicate that the 
input will be excitatory. Ihe - 1 symbols indicate that the 
input will he inhibitory 



Figure 3: Hardware block diagram of an image processing 
system adapted to he used to implement the Edge Enhance¬ 
ment System. The basic building blocks area pair of frame 
buffers, a convolver and a look-up table for performing 
nonlinear transformations 


78 


Dr Dobb s Journal Abril 1990 












































































































Image filtering by use of convolu¬ 
tions is one of the cornerstones of ma¬ 
chine vision. By properly selecting the 
coefficients of the filter, you can detect 
edges, create high- or low-pass filters, 
grow or shrink light regions, and quite 
a variety of other functions. You 11 find 
more information on digital image fil¬ 
tering 2 at the end of this article. In 
practice, implementing an edge detector 
using a convolution filter is not diffi¬ 
cult. The problem that arises is that of 
finding good filter coefficients, which 
do an effective job of finding the edges 
rather than losing or obscuring them, 

A second commonly used technique 
in image processing is called a “look¬ 
up table*” Just as the name implies, the 
value of a pixel is applied to the input 
of a look-up ta ble (usually the address 
li nes of a static RAM array) and a “trans¬ 
formed” value is produced at the out¬ 
put (the contents of that memory loca¬ 
tion). The mapping function is typically 
arbitrary and can be defined by the user. 

Look-up tables are used to enhance 
contrast, convert images to black and 
white (from gray or color), and to pro¬ 
duce special effects. The Cherry Coke 
commercials use this to make the can 
of Cherry Coke be in color and all else 
black and white. In our case, they can 
he used to implement a clamped linear 


transfer function. To implement a 
clamped linear transfer function in an 
8-bit system, set the mapping RAM to 
output zero whenever an input in the 
range 0x80 through Oxff (negative val¬ 
ues) is applied. For locations 0x00 
through 0x7ft set the mapping RAM to 
output the same value as the Input, 

Implementing the EES 

Both the convolution and look-up ta¬ 
ble techniques are such common tools 
that both are included in most com¬ 
mercial image processing systems* To¬ 
gether with a pair of frame buffers (also 
common), we can actually implement 
a very fast and moderately priced edge 
enhancement system. Companies that 
supply suitable hardware and software 
include Imaging Technologies ( ITT), Da- 
taCube, Data Translation, and Matrox, 
A block diagram of the hardware to 
implement the FES is shown in Figure 
5. To set up the system, we load the 
block show r n as “Filter Coefficients” 
with the coefficients From the MHF, 
and the look-up table “Transfer Func¬ 
tion” with the values for a clamped 
linear transfer function; 7 x 7 is the 
minimum-sized convolution to use for 
the MHF, Some of the systems men¬ 
tioned also support 9x9 and larger 
convolutions. 


The sequence of processing is as 
follows; 

1. Acquire an image from the camera 
to frame buffer 1. 

2. Transform frame buffer 1 to frame 
buffer 2 using the MHF filter and 
clamped linear look-up table map 
function, 

3. Transform frame buffer 2 to frame 
buffer I using the Mexican hat func¬ 
tion filter and clamped linear look¬ 
up table map function* 

4. Repeat steps 2 and 3 as many times 
as desired. 

Because most systems are designed 
to work with small integers, it will be 
necessary to make the appropriate trans¬ 
lations, Til is is an example of how neural- 
network technology can lie grafted into 
existing technology to enhance its per¬ 
formance, With a little thought, it is 
possible to apply similar techniques to 
a variety of other problems. 

Software Implementations of EES 

When I began doing research on these 
filters for a project we are working on, 
I wanted something that would be easy 
to work with, and I could quickly try 
out a variety of parameters. After a little 
thought, I decided to try out my new 
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PRODUCTION LEVEL $495. 

Metacompiler: DOS/ROM/direct/indirect 
C data structures & struct compiler, 
TurboWi n dow-C graphics library, 

Options: 

FOOPS+ with multiple inheritance $ 75. 
286FORTH or 38GFORTH $295* 

TbrboWijidow-C (Metagraphics) $ 99* 
BTRIEVE for HS/FORTH (Novell) $199. 
ROMULUS HS/FORTH from ROM$ 95. 
FFORTKAN translator/m athpak $ 75. 
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copy of Lotus 1-2-3. The spreadsheet 
instance described in this section is die 
result of those efforts. Though l used 
Lotus 1-2-3, Release 3-0, it should be 
possible to implement this with most 
spreadsheet packages and computers 
that support a graphing option. 

As it turns out, a variety of other 
techniques could have also been.used 
to do this research. Listing One t page 
114 t shows a C program that imple¬ 
ments the same functions as the spread¬ 
sheet, but without the nice graphics or 
ability to change data as easily as with 
the spreadsheet. Both the C language 
implementation and the spreadsheet 
implementation deal with the more lim¬ 
ited problem of a one-dimensional data 
stream rather than the two-dimensional 
image processing we have been dis¬ 
cussing. Laler in this article. I’ll discuss 
how to extend the one-dimensional 
model to two-dimensions. 

Listing Two, page 114 f shows the 
spreadsheet constructed. The numbers 
to the right are the row numbers. The 
letters along the bottom represent the 
column numbers. The Graph capabil¬ 
ity of Lotus 1-2-3 is used to display the 
results from processing the one-dimen¬ 
sional signal or data stream. Although 
not every aspect of the spreadsheet is 
discussed here, the entire spreadsheet 
is available on-line or on disk from 
DDJ. 

The first step in constructing the spread¬ 
sheet is to set up the "static" data. This 
consists of all titles, the 'bias'" (cell 
D7), "Low Pass Filter" (range C20. .C2H). 
“MHF Filter” (range D20 D28), and 
“Raw Input Data” (range El6. El 24). 
Everything else in the spreadsheet is 
computed. This static data is entered 
exactly as shown. For the Raw Input 
Data, 0.00 represents “black” and LOO 
represents “white*” Intermediate val¬ 
ues may be used- Be careful to put 
everything in the cell locations shown* 
After the spreadsheet is constructed, 
you can move things around to suit 
your taste. 

The calculations for the Low Pass 
Output data are as follows, assuming 
that you have entered the static data in 
the rows and columns shown. Enter 
the following equation in cell B20: 

+$C$2Q*E 16+$C$21 *E 17 

+$C$22*E18*$C$23*EI9 
+$C$ 24*E20+$C$25*E21 
+$C$26*E22* $C$ 27*E23 
+$C$28*E24 

or with Lotus 1-2-3, Release 3: 

@ SUMPRODUCT 

( $C$20. *$C$28 t E16. ,E24) 

Then replicate cell B20 throughout the 
range B2L .B12G. This column is la¬ 


beled as “Graph A” as a reminder of 
which graph range to use to display it. 
(Line 14 of the spreadsheet.) 

Calculations for the neural-network 
filter are done in a single step. Com¬ 
pute the internal activ ation and transfer 
function as follows; 

@MAX(0.0,@MINU.0, 

$ D $ 20*E16+ $ D $ 21 * E17 
+$D$22*E18+$D$23*E19 
+$D$24*E20+$1>$25*E21 
+$D $26*E2 2+$ D$ 27*623 
+$D$28*E24—$ D$7» 

or with Lott us 1-2-3, Release 3: 

@MAX(Q,0, @MIN( 1,0, 

@SUMPRODUCT( $ D $ 20. . 
$L>$28 t E36. .E24)-$D$7)> 

Then replicate cell F20 throughout the 
range F2L Ml20. The ®MAX(0, . J 
damps the output so it can never go 
below zero, @MTML - J damps the 
output so it can never go above one. 
The sum of the pair-wise products (or 
SUMPRODUCT) computes the effect 
of the neighborhood processing ele¬ 
ments on the current one, a net includes 
feedback of the current state. The 
- $D$ 7 subtracts off the bias from the 
internal activation. 

The First four and the last four cells 
in columns F through M are a copy of 
the v alues of the cells just prior to them. 
To replicate the values of the top of the 
columns, enter: 

Cell FI6: +FS20 

Then replicate it throughout the range 
FI6. ML9. To replicate the values at 
the bottom of the columns, enter: 

Cel! F121: +F$120 

Then replicate it throughout the range 
FI21, ,M124* The computation portion 
of the spreadsheet is now' complete. 
Use the graphing feature of your spread¬ 
sheet to construct the graphs described 
in Figure 6, These two graphs will be 
used to display the processing effects 
of various types of inputs and filters 
on the output data. 

Testing the Spreadsheet 
Implementation 

I laving constructed the spreadsheet just 
described, the graph EES should look 
like the one in Figure 7a. Figure 7b is 
the same graph with the input range 
(Range B) reset, so it shows only the 
output of the network as it evolves. 
Figure 7c shows the input data and the 
final (eighth) iteration of the network 
with intermediate ranges reset (Ranges 
C D, E), 

The edge data for this experiment 


was selected to show profiles of two 
kinds of edges often found in images. 
Jn the first kind, light shines on a curved 
edge or rounded edge resulting in a 
gradation in intensities. The gradually 
changing light intensities on the left 
side of the graph are typical of this kind 
of edge. The second kind of edge is a 
ragged edge such as from tom metal. 
This type shows wide variations in gray 
level due to specular reflectivity as well 
as sharp variations in the curvature of 
the material. This is shown as the very 
noisy edge on the right of center of the 
diagram. Notice that the EES does a 
very nice job of sharpening both edges. 

To the far right is a small “blip” in 
intensities. This blip is of the same mag¬ 
nitude as the one in the center of the 
main pulse. Notice that the EES was 
able to pick this out, because of its 
contrast to the background, while ig¬ 
noring the noise on the top of the 
pulse. A little experimentation will show 
that this is quite a powerful technique. 
The bias value (in cell D7) can be 
changed 10 alter the sensitivity to vari¬ 
ous features. Changing the shape of 
the MHF also changes the nature of 
edges detected. Figure 8 shows the 
MHF used in the filter. 

As it turns out, both edges used in 
this test tend to be difficult to find 
using standard image processing tech¬ 
niques. Figure 9 shows what happens 
when a simple sohcl operator is ap¬ 
plied to the input. The resulting de¬ 
rivative function does not provide much 
information about where the edges 
might be. The problem is not that such 
a filter is difficult to implement, but 
that finding a set of coefficients and a 
filter length, which enhances the edges 
rather than missing or obscuring them, 
is a highly heuristic and often frustrat¬ 
ing task. My own experience is that it 
is sometimes impossible. 

There are a variety of experiments 
you can do with the edge enhance¬ 
ment system. One of the things you 
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Figure 6: Constructing the graphs 
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will discover is that the system can be 
sensitive to the shape of the MHF as 
well as the bias. In some ranges, the 
detected edges actually set up standing 
waves, which emanate out from the 
edges! 

How It Works 

As 1 mentioned at the beginning of this 
article, the EES is an engineering ap¬ 
proach to image or signal processing 


based on biological insights. It was de¬ 
veloped heuristically staiting with a bio¬ 
logical model and studying it until the 
mechanics of its operation were well 
understood. As such, there is no formal 
theory of operation. 

Functionally what happens is that 
the MHF acts as a difference of Gaus- 
sians filter. The transfer function clips 
the negative part of the output, leaving 
only the positive center peak when the 


The Berkeley Utilities 
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Figure 7a: Output of graph HUS of the Edge Enhancement System spreadsheet. 
7 he inputs, as well as the network outputs after 1, 3, 5, and 8 iterations, are 
shown super imposed 



Figure 7b: Output of the network as it evolves, this shows only the network 
outputs after t, J, y and 8 iterations 
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Figure 7c: 7 he original input to the network and the output after eight 
iterations are shown super-imposed 



Figure 8: The Mexican Hat Function used in the Edge Enhancement System 


5 


1 



Figure 9: Results of applying a sohel (simple edge detection) filter to the input 
data. The sohel computes the derivative of the image 


filter is directly over the edge. When 
the MHF is applied again to the result¬ 
ing output, it will tend to enhance sin¬ 
gle peaks but reduce plateaus. As such, 
lots of noise in the vicinity of an edge 
will be ignored. However, a single sub¬ 
stantial variation against a constant back¬ 
ground will lie significantly enhanced. 
Iterating on this process eventually re¬ 
sults in groups of saturated processing 
elements, at most the w idth of the exci- 
tatory part of the MHF. All other pro¬ 
cessing elements are turned off. 

Extending the EES to Two-Dimensions 

The same principles used in develop¬ 
ing the one-dimensional EES apply to 
the two-dimensional version. Instead 
of using a single-dimensional vector, a 
two-dimensional matrix is used. One 
example of a 9 x 9 MHF is shown in 
Example 1. 

The process of computing the con¬ 
volution (sum of pair-wise products) 
with the corresponding portion of a 
pixel array is the same. Likewise, the 
damped linear transfer function uses 
the same equation used in the spread¬ 
sheet Implementing this on an image 
processing system will require convert¬ 
ing everything to work with small inte¬ 
gers, but the process is quite straight¬ 
forward. 

Summary 

Insights from the operation of the hu¬ 
man eye can he used to build improved 
image enhancement systems, particu¬ 
larly edge enhancement systems. The 
basic mechanisms involved are capable 
of turning an image (or one-dimensional 
signal) with fuzzy anti noisy edges into 
a sharp dean edge-enhanced image. 

This technology can enhance the so¬ 
lution of a variety of problems includ¬ 
ing character recognition, part track¬ 
ing, part inspection, printed circuit board 
inspection, ultrasonic image interpreta¬ 
tion, target recognition, and so on. 
Enough similarities exist with traditional 
image processing techniques that these 
neural networks can be implemented 
with traditional image processing hard¬ 
ware and software systems. 
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BAM SYSTEMS 


Listing One (Text begins on page 16 J 

ff/////m tin f ffiff iff tin ft nu mm nun arm mum? 

ff BAM.HPP Provide vector, matrix, vector pair, matrix, BAM matrix, and 
/t BAM system classes and methods to imp Learnt BAK systea concept, 

// Extended note; 

/ / This is an impLamentation of the concept of Bidirectional 
// Associative Mensoriea as developed by Bart Konko and others. 

// It includes the extended concept introduced by Patrick Simpson 
// of the " Bam System", where reasonable Simpson's notation has been 
// been maintained. The presentation benefit? from C+* and OOP, in that 
// (1 believe) it is both easier to understand than a ‘'pseudocode 1 ' version 
// yet urnre precise jin that it works!) 

ff 3>eveloped with Zortech C++ Version 2.0 -- Copyright (c) Adam Blum, 1909,90 

tinclude cs t dlib.h> 
linclude<io.h> 
fincludeOt dio. h> 

Iinc1ude < string,h > 

Iinclude*;1imit s„h > 

Iinciude<ctype.h> 

Pinclude^st ream.hpp> 
fdefine D(x) |if [trace)(x]| 
extern ink trace; 

U where are £erteth *5 min,maxi 1 

♦ define inax(a H fci) ([(a) > [by) 1 (a} : fin) J 

♦ define rain (a, b] H(a) x rbH ? [a) : lb)1 

// will be changed to much higher than these values 
const B0W£=lfi; f{ number of rows 1length of first pattern) 

const CQL5=0; // number of columns (length of second pattern) 

const MAJCMATS^IO; maximum number of matrices in BAM system 
const MAXVEC=1£; // default size of vectors 

class matrix; 
class bam_matrix; 
class vec | 

friend class matrix; 
friend class bamjaatrix; 
friend class bam_syatew 
int n; 
int +v; 

public; 

// see BAM. CPF for implementations of these 

vec j int size=MAXVE'CH int vai-0); >. constructdr 

Vec()? // de at ru ctor 

vec j vec fcvljj if copy’initializer 

int lengthjl; 

vec* operator= (const vec* vl); if vector assignment 

veei operator+ (const Vect v 1 ? r / ■' vector addition 

vec* operator-(const vect vli; // vector additive-assignment 

vect operator^(int L) t ff vector multiply by constant 

// supplied for completeness, but we don't use this now 

int operator* (const vec* vl); dot product 

vec operator*(int C )i if multiply by constant 

ff vector transpose multiply needs .access to V array 

int operator=j const vec A vl]; 

int* operator!][int x); 

friend istream* operator» [(stream* a.veciv); 
friend ostream* operators (oat ream* a, vec* v); 

1 7 //vector class 

class veepair; 

class matrix I 

protected; 

// bamjnat nx (a derived class) will need to use these member? 

// preferred to "friend class",, since there may be many derived 
// classes which need to use this 

int m *m? ff the matrix representation 
int r,c; // number of rows and columns 

public; 

fi constructors 

mat nx(int n-ROW£, int p=COLS) .■ 

matrix(const vec* vl,const vecs v2); 

matrix(const veepair* vp[; 

matrix (matrix* ru)j; // copy-initializer 

"matrixO; 

int depth(); 

int width!); 

matrix* operator 3 (const matrix* ml); 
matrix* operator+(cons; matrix* ml); 
matrix* operator+=(const matrix* ml]; 
vec colslicelint col); 
vec Eowsiicejint row); 

friend ostream* operator^c(ostream* s,matrix* ml); 
i; // matrix class 

class v-ecpair ( 

friend class matrix; 
friend class barr^matrix; 
friend class bairj_system; 

int flag; ff flag signalling whether encoding succeeded 
vec a; 
vec b; 

public; 

veepair (int G=EtC*75, int p=C0LS|; if constructor 
veepair[const vec* A, const vec* B); 
veepair(const veepairt AB); // copy initializer 
’'veepair[); 

veepairfc operator-(const veepair* vl); 
int operatec-=jconst veepair* vl); 
friend istreami operator » (istream* s, veepair* v); 
friend ostreami operator^[ostream* s H vecpairfi v); 
friend matrix;imatrix(const veepair* vp); 


class bam_matrix; public matrix ( 
private: 

int K; // number of patterns stored in matrix 
veepair *C; // actual pattern pair? stored 


Litt ieedthru [const vec*A, vec* 3 ]; 

int sigmoid(int n]; // sigmoid threshold function 

public; 

bamjnatrixUnt n=ROB(S,int p=€OLS); 

-bam_mat rix [) ; 

ff but we supply it with the actual matrix A!B (W is Implied) 

void encode(const veepsir* AB); ff self-ref version 

// uncode only necessary for BAK system 

void uncode(const veepair* AB); // self-ref version 

veepair recall(const vet* Al? 

int check ()t 

int check(const veepa^ r* ABJ ; 

ff Lyapunov enerqy function: E=--AkJBLrariapDse 

int energy j const irujtTlX* mil! // Lyapunov energy function 

1; // BAM matrix 

class bam_system. [ 

bam_matrlx *M(MAXMAT15 \ ; 
int H; // numbe; of met rites 

public; 

bam_?yst em (int K=1)? 

"bam_syst«ii(}; 

void ejiccde [const veepair* AB) ; 
vecpeir* recall(const vec* A); 

// train equiv. to Simpson's encode of ail pairs 
void train(char *pattern£ile); 

friend ostream* opera i: or« (oat ream* s, bairi_systemfc b); 
l; ff BAM system class 

End Listing One 


l isting Two 

fffff/fffffffffffffffffffff/f/ffffWff 

ff BAM.CPP Provide vector, matrix, vector pair, matrix, BAM matrix, and BAM 
// system classes to implement BAH syatenu- 
// Extended note; 

// This is an implementation of the concept of Bidirectinoal 
if Associative Memories -i? developed by Bart Koska and "'hers, 

// Tt includes the extended concept introduced by Pat tick Simpson 
// of the "BAH System 1 ', Where reasonable Simpson's notation ha? been 
// been naintained. The presentation benefits from Cm and OOP, in that 
// (T believe) it is both easiur to understand than a "pSEudocods" version, 
ff yet more precise (in that it works’) 

ff Developed with tor tech Cm Version 2.0 Copyright Ec) 1909,90 Adam Blum 
1inciude"bam, hpp” 

t/fffffffffffffffffffffffffffffffff 
ff vector class member functions 

vec; jvecimt size H int val) j 
v “ new int[size!; 
n-size; 

forjiot i=0;i<n;t++) 
v[ij-D; 

) ff constructor 

vec::'vec() I delete v;) fi destructor 
vac:;vec(vec* vl] fi copy-initializer 
( 

v=nffw int[n=vi*nj; 
for(int i“0;itn;i*+j 
vtij-vi .vtiii 
i 

ve c* vec:: ope rater- I can st vac * vl 1 

[ 

delete v; 

v=new int|n=vl.n j; 
torjint i-<0;i<n;i++) 
v[il=vl*v[i]; 
return ‘‘this; 

) 

vec* vec:ibperator*(const vecs vL) 

f 

vec sum(vl.n); 
sum, n=yl. fi; 

for(int i-0;i<vi.n;i*+) 

sun,v[i|=vl*v[ij +v[i|f 
return sun; 

J.. 

vec* vec;: oporator+=[const vec* vlI 

\ 

for (int i=5;i<vLn;itf) 
v[ij+-vl,v[i]; 
return ‘this; 

I 

vec vec;:operator*(int c> 

1 

vec prod (length ()); 
for (int i=0;i<prod,tij i*+) 
p rod.v[i1=v|i|*c; 
return prod; 

J 

int vec::operator*fcogst vec* vi) // dot-product 

I 

int suin-=0; 

tor tint i=Q;i<niin (n, vl.nj ; i++] 
smn+= (vl, v [ i 1 *v [ i J) ; 

fin [cout << "dot product '* « *thia « ul «■ sura « ,I \n ,T ;) 
return slusi; 

) 

int vec: joperator" [const vec* vl) 

I 

if(vl,n!=n)return D? 
for (int i=0;i<siin(n, vl.n) ;i+*) I 
if (vl „v[i| !=v(i |) [ 
return 0; 

I 

return 1; 
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I 

int£ vec: ;gpemor [ J [int X) 

[ 

if [x<length(t ii x>=0|i 
return v£x]; 

else. 

cout. « "vec index out of ranged; 

I 

int veci;length(] | return n; I // length, method 

istreami operators (is treami fivj 

U format: list of ints followed by 'j' 

\ 

char c; 
v.n-0; 

v,v=new int|HftXVECi; 

forfrn < 

s»tt 

if (e, soft)1 return s; 

If(c**' f ')return s; 
if(iaspate<c)}continue; 
v,v[v,.n+t]- (<c!-'CT ) 71:-U ; 

I 

1 

os l reams operator*;* (astreami s* vecs v) 

H format: iiflt of inta foliowod by 
I 

far(int i-0;i<v.n;i++J 

s « {v>v[iJ<Q7(M>; 
a « ”, m t 
return s; 

} 


umnummmmmtnun 

// matrix member functions 
matrix::matrix[inc n.int p| 

( 

7/D I cout « ’'Constructing * « n. « x " « p << " matnx.Xn,'’;) 

m-new Lnt *[n)f 

for tint i-0; Kn/i+t) ( 

mlD-new intjp]; 
for[int ;j=Q; j<p; jH-) 
m[i][j]*pf 

r a n; 

C'PJ 

] if constructor 

matrix::matr;x(const vecpairi vpl 
I 

//EHcout « ’'Constructing matrix from: 11 « vp;} 
r*vp.a.length (); 

C=Vp»b►length() ; 
m-new lnt *lrj? 

for (int i“0;i<r;i++M 

m[if-new lnt[c]; 
for{int j=0:j<c;}*+) 

m[i 1 [jl-vp,a-vti]*vp.b.v[j]; 

I 

|/7 constructor 

matrix::matrix{const uecfi ul,const vecfi v2} 

i 

//l>(cout « '’Constructing matrix from " « vl <c v2 « 1, \rE lh ;) 

r-vl.length! \i 

c=v2.length | f ; 

m-^nev int Mr]; 

for (rnt i*Q>i<rfi+tn 

m[ij-new int[c]; 
for {int >0f j<c;.}++) 

m[l][jI"vl.vfi)*v2.v[j]; 

I 

1 it constructor 

matrix:^matrix(matrixs mil // copy-initializer 

[ 

//D(cout « "matrix copy-initialiieTW; ) 

r=ml.r; 

c-ral.0; 

m=new int *[rj; 
for(Lnt i-Dji<rri++}I 

m[i]-new int[c )t 
for (int j=0r j<c p ‘j++) 

m [iI[j]“ml.m(il[j]; 

1 

f 

matrix;:'matrix() 

( 

fgr(int ±=G;i<r;i++t 
delete mfij; 
delete mr 
\ // destructor 

matrixi matrix: :opeiator= (const matrix* mil 

I 

far(int i-0;i<r:i++| 
delete m[ i]; 

r-ml.rf 
c=ml .c; 

m°new intMil* 
iftje ji=ffj i<r; i++| | 

m[ij=new int lc] ; 
for(int j=0;j<r;j++) 

rn|it l j]=ml .mtij [ j] / 

i 

return *this; 

)■■ 

matrixS matrix::opeiator+(const matrix^ ml) 

f 

matrix sum(c*c)? 
for (int 1 = 0 1 icr; i-H-) 

for(int j*G; j<r; j+*|i 

5um.m[il [ ji|=ifil .mfi] f jj+ia[ij [ j J ,■ 

(Listing continued on page 86) 


Windows® Text Editing 

for the serious programmer 



Speed Edit* the only program development environment/text 
editor for use with MS-Windows, Presentation Manager®, 
DOS, OS/2 and Unix®* Call or write: 

Bradford Business Systems, Inc. 

25301 Cabot Road, Suite 201 , Laguna Hills, California 02653 
( 714 ) 859-4428 

Windings U a rcyistcrL-d trademark of Microsoft Cnrp., FVes^nlfltion Manager is s Irademark 
of IBM Corp., Pnii is a Irjidemark of ATT. 


CIRCLE NO. 406 ON READER SERVICE CARD 

MICROSOFT, TURBO AND MIX POWER C PROGRAMMERS..,C WINDOWS ^ 
TOOLKIT' PUTS YOU IN CHARGE OF VIDEO and DATA-ENTRY 


-- NEW FEATURES - n 

* ComprvtKmive- data-entry and wrificam procedures with sc&jf ) type syntax. 

* Predefined data-entry functions for dates, SSWs, telephone numbers, curmocy anwu/ifs with 
commas, time, scientific notation, etc. 

* Turn any wind# into an editor with your choice of keyboard mapp/ng (Wordstar m by default], 

1 Virtual windows up to mailable memory. 

* Save endows to disk. 

* Hosted windows. 

V * Creels and edit VGAiMCGA/EGA/Harcuks fonts of any size. 


ng p/mmr o> 

# 


W|ND0W(NG FUNCTIONS 


WMUEGASUPPOFfT 


'Cr&at#pdHJpwih*w3 

* Crease puH-down mewa 

* Create SprasitehMtmflmjs 

* Create conteocl-senaitwe help screens 

* Store wndowt in RAW gr an disk 

* Modify wndewsoulol view 

* U$& 0 ddtorenl Types of asploding whdews 

* Scroll and move windows 


SYSTEM CONTROL 


* Oevice’independenL oulpul 

* Support VGMMCGAmiHaradnf CGWMDA 

* Csecs the types of video adapter installed 
•Switchbetween adapters 

• DeteCSAHSliYS 

• DetecvtheantancBd keyboard 
»DiB&3le the video signal 

• Deiay program aoecuiicei to mitroseoend resolutioii 


n Hhiree axle included - No fim-n me myalliEs, 


* Useall64VGAJE'CAcc*dre 

* Use VGA 29/43/50 line modes 

■ Use EGAWinemgdr: 

■ 2 lomts smuWanecxjsiy 

1 Design and edit custom fonts with F0NTEDIT Ttour ksit 
ediior (included! 

■ Smooth scroll amd pan the s&ew 

FAST SCREEN tfO__ 

* Write formated oulpul [H« printf{)) 

* Get snow-lree' oulpul on the CGA 

* Use dtect screen writes or the BtOS 


HERCULES SUPPORT 


«Create and rM ythir own Ramfonfls* 

* Detect (he presence of a Hercules Card 
■ Delect Mom” support 

«Load and store fiamfoms" to RAM or disk 

• Switch between mutes 

Includes 230 page manual - 30-day itonEy-flacfc Guarwvlee 



Magna 

Carta 

SOFI'WARE 



Requires- IBM PC. XT,AT, PSffiDrotmuHtible 
Supports Microsoft C/Quick C. Borland Tuito C. Mix Power c 

CALL (214) 226-6909 


Only s 99? 5 


(Texas Residents add 
8% sales tax.) 


Dr. Dobb'sJournal, April 1990 
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BAM SYSTEMS 


Listing Two (Listing continued, text begins on page 16. J 

matrix* matrix;:operatar+=(const matrix* mi) 

t 

//P(coyt «. "matrix additive assignment^ 1 *:) 
for(int i=Q;i<rfiii<ndl L .r;i+ + ) 

Ear[int j=Q;j<a*Sj<ml,c;j+4) 

m[ij [ j] ♦ -{ml,inli ] l j] ] ; 

return 'this; 

J 

vet matrix: jeololice £int col) 

f 

vec temp(r); 

for fint i=Gjti<r;i++) 

temp,vjij =m[i]teat]; 
return temp; 

vec matrix::rowslice(int con) 

I 

vec temple); 
f o r 1 int 1-0; kc; i+* ) 

temp^v I i ] =* | row) [ i]; 
return temp; 

) 

int matrix;:depth ()1 return r;] 
int matrix: : width () ( return c; 1 

ostreamii operator^ (ostream* 5 ,matrix* mU 
fi print a matrix 
[ 

for [int i-0fi<ml,r; 1++H 

for lint j-Q;]<ml .c; g++) 

a « ml T m [ i ] [ j ] « " 

3 « 

\ 

1 

nuuummiuuumuumumnnn 

(f vecpalr member functions 
// constractor 

veepair:tveepair(int n,int p) { I 

veepair::vecpair (const vec* A H const vec* Bj |a=A;b=B;I 
veepair::vecpair(const vecpaii* AB| \ * this-veeps it (AH-a r AB.b] ;I 
veepoir;:’vecpair() M fi aestructnr 
veepair* veepair; : operator- (const veepair* vIE 
f 

a-vl.a? 
b=vl„b; 
return ‘this; 

J 

in'; vecps i r::operator= 1 const veepat r * vl J 

I 

return (a =■ vt.al &S [b “ vj h b); 

J 

i st ream* ape rat or » (is t ream* 5 , vettpair* vlf 
// input a vector pair 

t 

s»vl*a»vl.b; 
return s; 

1 

□stream* operatorc< (ostreair* 5 , veepair* VU 
U print a vector pair 
1 

return s«vi + a«vi t b« T, \n": 

\ 

uinuiHunuunmnmmu 

//bam^matrix member functions 
bamjmatrrx: ;bam_matrix(int n,int pE;(n,pE 
( 

// the maximum number □ £ pattern pairs siarable 
//da around min In,p) where n and p are 
// the dimensionality Df the matrix 
C°new veepair[min(n, p]* 2 ]\ 

KMb 

J 

bam_matcjjt: r - bam_matrix() 

I 

) // destructor 

void bam mac r ix :: encode (canal veCpairi AB'i 
U encode a pattern pair 
! 

/VtHcout <c 'BAM Matrix encoding: " « AF;t 
matrix T PA.B); 

(*thiaT+=T; // add the matrix transpose to the current matrix 
CfKj-AB; 

Jt++f 

I 

void bam matrix: t uncode (const veepair* AB] 

if get rid of a stared pattern I by encoding A-R can^Jement ) 

i 

//D(cout <r "uncodeNn ";1 
vec v-AB,b*-lf 

matrix T(AB L a,v)f // T is A transpose B complement 
*thi 3 *=TF// add the matrix transpose r o the current matrix 
K-; 

vecpaiE bam_matrix:; recall (const vec* A) 

// BAM Mattlx recall algorithm (Used by BAM SYSTEM retail) 

I 

int givenrow= (A. length () =width (J); 

D{cout«"BAM matrix recall of" << A « givenrov?" (low) in":" fcal)\n";) 
vec Bigivenrow?depth():width[) P 1 ): 

fDr|?;E| if teed vectors through matrix until "resonant" pattern-pair 
feedthru(A,B }; 

if |feedthxufB r A)Jbreak; // Slop when returned A = input A 

1 

D(cout« 11 resonant pair " « A « *\n and H << B « *\is M ;3 
if (givenraw) 

return veepairfB, A); 

else 

return vecpair(A,B); 


1 

int bari_rr.atrix: :feedthru [const veciA,vec* SE 

( 

//D [cout << "Feeding N « A « "S.n"'; J 
vec temp=Bjint n; 
for Tint i=0,-i<B T length {) ji++) f 
if (A, length jl ==>vldth () ] 

n=sigmoid[A*rowsiice( 1 )J; 

else 

n-sigmoid [A*colslicc (i) ) ; 

if [nT 

B,v[i]-nj 

1 

return B==temp; 

\ 

l n l bam mu C r 1 x: 1 3igmoid(iut n E 

if VEEUTsimple (but classic ane for BAM| threshold function 

if 

a 1 w- 

// ^ 

u -1 

{ 

if(ncG]return -Is 
if (n>Q) return 1 7 
return 0; 

,nt bsm_matrix:;chech(j 

if check to see if we have successfully encoded pattern-pair into this matrix 

I 

Dfcout « "Check BAM matrix for ,r « K « " pattern pairs\n n ;) 

veepsir AB; 

far Tint i-T);i<K; i + t)[ 

AB=recall(C| 1 ].a); 
itu (AB=ctinn 

D(cout <<“failed checlt\n "■;) 
return 0; 

} 

B(cout « "passed checkin 
return If 
I 

int bam^matrix:;check(const veepair* ABT 

f f different cTlecjc routine tor orthogonal construction HAM 
i /check to see energy of present pattern pair to cat rax 
if xs equal to orthogonal BAM energy 
matrix T(AB); 

return energy(T)= -depth | E'■width [); 

I 

int bam, matrix::energy (const matrix* mil 

i 

int sum=Q; 

for I int i-D;i<depi:h () ;i++) 

for (int j=Gj j^Wldthd J je+] 

3uit4- (ml,m|i| [ j) *tbis->nlij [ j)); 

Dfcout « "Energy of matrix " « -sum « "\n''r) 
return -sum; 

I 

ifiififiififiiiifiifiifififffff/ifiiff/iiii 

H ba® system tunctions 
// top level of system [for now) 

// constructor 

bam_sy stem:;bam_system(int n f 

■f 

M=n; 

for (int i=0;i<M f *i++) 

K( 1 ]-new bam_matrix; 

\ 

bam system:;“ba m_sy5 tem 1 e if dear rue tor 

I 

for (int 4,=0.fi<fffi-f+} 
delete H[iJ; 

void bam_system::encode(cons 1 veepaic* AB) 

encode the pattern pair AB into the BAK rystem 

I. 

Ojcout « "BAH System encode\n";) 
for (iru. h=0;b<M;b ++1 | 

W(h]->encpde(AB)? 

if (1 W[h] ->checMl) 

tf|h.-^uncode(ABj; 

else 

break; 

iffh=M1| U all matrices ful) P add another 
if(h^MAXMATB)[ 

W (M | -new bamjnat nx (); 

HfMj-encode (AB); 

M* + ; 

I 

slse[ 

cout « "BAM System full\n"; 
exit(if; 

I 

1 

veepair* bam system::recall[const vec& AT 

// presented with pattern A, recall will return pattern-PArR 
\ 

vecpair xy[maxmatS]; matrix "Mlj*U2z 

tot £ r mlniJiiuro-0>emin=lNT_MAX; 

P(cout « "BAM System recallVn";) 

Eor(mt h-G;h<M;h++f | 

XY|hJ-W[h]->recan [A]; 

D (cout <,< h << 1h -th mstnx H returned veopalt "« XT 111 1 f J 
Ml-new met rix [JtY[h]); 

(Listing continued on page 88) 
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Tools 


OS/2 Software 

Btrieve . . . 

C tree. . 

C worthy. 

Dataflex. 

Green leaf Data Windows 

MKS Awk. 

MKS Lex & Yacc. 

MKS toolkit 

OS/2 PM tool Kit. 

Paradox 

Power Search. . .. 

Small talk/v PM. r *. 

VC Screen. 

Vitamic C. 

Xlrieve Plus. 


Control Programs 

Concurrent DOS 336 (3user$). .335 

QEMM 336. 65 

PC-MOS 336 [single user) .179 

VM/386 ..189 

OS-Support 

DESGview.110 

ms wmdowsvaee.es 

MS Wlndows/386.144 

Development Toolkit...319 

386 Products 

386 Max Pro , .. 115 

High C 386. ..635 


7819 East Greenway Suite 8 • Scottsdale, AZ 85260 • Outside US call (602) 443-0580 

All Prices and Offers Subject to Change Without Notice 


CIRCLE NO. 385 ON READER SERVICE CARD 


Language 


DBMS 


ALExpert Systems 

ARITY Combination Pkg.974 

E x sy $ Professional.694 

PC Scheme LlSP-byTl.74 

Personal Consultanl Plus. . . . . .2482 

Turbo Prolog Toolbox .70 

TURBO PROLOG V2.0.110 

VP Expert , . .219 

Assemblers 

Ad van ta ge D i sas se mbfe r.279 

Incra.. 159 

MS Macro Asm. . . . .97 

Turbo Assembler/Debugger. .98 

Visible Computer 80286..34 

Basic & Addons 

DB/Lib 129 

Exim Toolkii . ... ,80 

MS Basic 6.0.199 

MS QuickBASIC V4.5 69 

QBase .124 

QuickPak Professional . ...... 129 

Softcode . . ..69 

True Basic .69 

Turbo Basic.69 

C Language-Compilers 

AZTEC C86-Commercial.699 

High C-236 - by M e t aWare. . 554 

Instant C/16M. . 715 

Lattice C-V6. . .....199 

Microsoft C 5.1-wfC ode View 295 
Microsoft QuickC w/QASM 135 

Turbo C- by Borland. ..105 

Turbo C Professional. 175 

Wat com G7.0-highly optimized.. 315 

Cobol 

MS Cobol V3.0. . . ..629 

Microfocus COBOL w/tools. . .1,345 
Realia COBOL. 844 


Fortran 

FOR_C-FORTRAN '77 to 0 . 670 

I/O Pro-screens. 124 

Lahey FORTRAN F77L.525 

Lahey FORTRAN F77L-EM/16. . 785 

Lahey Personal FORTRAN.84 

M S FOR TRAN -Co deV I e w 295 

RM Fortran.494 

WalFor..349 

Modula-2 

Logilech Dev. Sys. 195 

Topspeed 3pak. .159 

Object-Oriented Programming 

ACTOR . 423 

Language Extension 1 95 

C talk .. . 137 

C__ia Ik/Windows... 375 

Smailtalk/V.85 

EGA/VGA Color Ext 45 

Goodies #1. #2 or 43 . . 45 

Smalltalk A/ 286 ... .169 

Zortech C + 4'.155 

w/source. 205 

Zortech C++ Tools V2..0 . . . 135 

Other Languages 

IntegrAda.724 

Janus Ada.. ....369 

Meridian Ada.1,119 

MuLISP-87. ..219 

PC/Forth +.199 

Personal Rexx.. . .129 

RPG II complete. . . . 1290 

Turbo Pascal 

graphics-Menu.134 

Turbo ASYNCH PLUS.125 

Turbo Pascal 5.0.105 

Turbo Pascal 5.0 Professional. . .175 

Turbo POWER TOOLS PLUS.124 

Turbo Programmer. 


Other Products 

Aspen Korn Shell. . . . . 

CONCESSION. 

dQuery/Lib. 

Evertrak. 

FM-Plus.84 

Link A Locate + + — ROM MSC.339 

Math Advantage .454 

Norton Guides. 75 

OPTune-disk optimizer..84 

Smarts rn 240.294 

Zap-file xler. . ,. 74 


Miscellaneous 

Case & Prototypes 

109 Dart Brie kiln Demo II...159 

214 Grasp ..127 

274 Instant Replay-Nostradamus, . 134 
.279 Interactive EasyFlow. .,119 

Meta Design by Meta Soft ware. 329 

Pro-C . ... . . 565 

PROTEUS Prototype System. . . 124 
Show Partner F/X^demos. ..315 

Sohdema.59 

Visabfe Analyst.579 


Debuggers 

386 DEBUG. 

.164 

Opt debug. 

.109 

Periscope OK 

.. .465 

Sherlock. 

.179 

Soft probe 86/P.X. 

.345 

Development Tools 

Codes if ter.. 

.85 

□ASM. 

.... 239 

Inside . ..... . 

.109 

MKS AWK. ... 

. .84 

MKS Lex & Yacc 

.205 

MKS RCS. 

. . .155 

PC-Unt. 

104 

Pfinish.... ... 

.229 

Plink 86 Plus-overfays. . 

399 

PolyMake . 

.129 

PVCS Corporate. 

,355 

RTLlNK-by Pocket Soft, ... 

.184 


Database Development 

DBman. 

.285 

DBXL. 

.... 199 

Clarion Prof, . . . 

... .459 

Clipper. . 

. . , 399 

dBASE 111 Plus. 

.. .450 

Force.... 

.585 

FoxBASE + . 

239 

FqxBASE + 1386 . 

.... 395 

Fox Pro Lan.. . . 

. . 745 

Fox Pro SU . 

.. .579 

Magic PC.. 

. .249 

Paradox 3.0. .. 

.... 469 

Quicksilver. 

, 379 

R:0ase for DOS.. 

.... 559 

dBASE Library 

Artlul.. . 

.189 

CodeBASE IV... 

. .215 

Funky . 

. .. . 175 

JDL. 

. . 125 

Netllb... 

. 185 

Proclip V3.5 . 

. . . .119 


File Management 

Btrieve. . 

. .-.180 

CBTREE.. 

. . 169 

C index for MSC 

. . ..175 

C-!ndex Plus . 

.... 329 

C-ISAM. 

. . 325 

COL. 

.199 

w/PASS . 

.... 349 

c-lree. . , 

.299 

d tree.. 

.... 395 

rtree. 

239 

dBC Ml PLUS. 

....435 

db FILE RETRIEVE. 

265 

Essential B-Tree w/source. . . 

. . . .149 

FABS Plus. 

172 

Netware SQL 

.... 489 

pBase . 

- - . 185 

Turbo Prog rammer/C 

. .449 

XDB-C... 

. . . . 555 

XQL . 

... 599 

Xtrieve PLUS. 

... .459 




Editors 

BRIEF .... Call 

wfdBRlEF.. ..Call 

Ed, The Programmer's Edition..... 315 

EDIX. 155 

Epsilon.155 

KEDIT.119 

Me w/source.169 

MKS VI. .. 125 

Multl-Edlt. 90 

Norton Editor. . ...55 

NHOFF/PC. 117 

PC/EDT +.269 

Pi Editor.129 

Qedtt. 79 

SLICK Editor. . ..170 

SPF/PG.189 

VEDIT PLUS.115 

Vq. Call 


Addons 


C Communications 

New! C Async Lib. by Silverware. 209 

BreakOut If .99 

C ASYNCH MANAGER.145 

Essential Communicaiions . . .159 

Greenleaf Comm Library.219 

Green leaf ViewComm . . .450 

Lattice Comm. Library.179 

Dbase Addons 

AdComm 99 . . . 105 

AUrtk., 179 

CLEAR + for dBASE.139 

□base Online V2.(L 125 

d Bug-source debugger.170 

dBX-dBASE 111 loC. " ... .460 

dCJlp.189 

dGE-business graphics. .174 

Documentor . 225 

dQuery..... . . 165 

dSaivage . 79 

FLIPPER Graphics Library. .175 

Friendly Finder. . .90 

Genifer-code generator.259 

R&R Code Generator. ... .125 

R& R Relational Report writer, .129 

Sc rim mage-screen/menu.. , 129 

SilverConnm Library V2.149 

Silver Painl Library.79 

Steve Straly Tools .. . ... 169 

Sycero db-slngle user.444 

Tom Rettig's Library. ..73 

UI Pro gram me r- Dev's Version 2.0 .419 
General Addons 

C Tools Plus-V5.0.. . .105 

C Util hies-by Essen Hal . ..154 

Greenleaf Functions.159 

Greenleaf SuperFunctions, , 209 


Graphic Addons 

Essential Graphics. .229 

Graphic C. . ..329 

Greenleaf Makeform-DOS.90 

GSS Dev'l Toolkit. .505 

Halo '68-149 + dev ices.275 

Hoops 3D Graphics . . . . . . 494 

MetaWINDOW/PLUS .. .269 

PCX Programmer’s Toolkit . . . 175 

w/source. 435 

Pizazz Plus.1211 

Turbo Mela-Menu w/source 204 

Turbo Plus-Nostradamus.114 

Texl Screen Addons 

AEWindows.204 

G Worthy w/forms ..259 

Curses-by Aspen Scientific.125 

Greenleaf Data Windows . 289 

Hi-Screen XL. 124 

JAM by JYACC.464 

VC Screen- painter.114 

Vitamin C-souroe, menus .164 

Utilities 

BACK-IT.120 

Copy II PC.35 

□ rsk Technician Advanced . . .149 
FASTBACK Plus. . . M2 

HELP ME. 90 

MACE GOLD. . 129 

MACE Ulililies. 90 

Norton Utilities Advanced .. .101 

PG/Tools Deluxe 5.5_ .115 

Vfealura Deluxe. . . .111 

V opt.Ill 

XENOCOPY-PC ... 70 

XTreePro. Ill 










































































































































































































































BAM SYSTEMS 


Listing Two (Listing continued, text begins on page 16. ) 

E=Hl&J->energy(*Wi f; 

if(A.length[}—W[h]~>width<)} 

M2=new matrix(XY[h].a, A); 

else 

M2-nev matrix (A, X'i [h] .h) , 
if ( ( E - (W [ h ] ->deptti (j * W [ h ] ->width 0 ) < emin ) 

Sfi (E==H[hJ->energyrM2)) 

) 

I 

emin-E- (W [h ] ~>dept h \ \ *W [h] ->width 0 ); 
minimum^hj 

1 

delete Ml; 
delete M2; 

] 

return XY[minimum] ; 

\ 

void bam_system: rtrain (char ’■patternf i le F 

//A "multiple-pair" encode - which Simpson callu "encode" 

// thi$ could be used for initial BAM Sys training. However an up 
// and running BAM Sys should only need to use "encode",. 

[ 

FILE ‘f-foperHpatternfile, "r"] ; int n**0; 
filebui sfileif); 

1 stream s I £aElie,.0f; 
vecpair AB; 

3 AB; 

if [a.eof (Hbraak; 

Ptcout « "Encoding " « n++ cc "-th pattern pair:\n" « AB ;\ 
encode(AB); 

1 

D{cout « "Completed training from ' v « pattemfile;) 

\ 

03tream6 operator« [ostreamt s, bam^sys terns. b) 

// operator to print out contents of entire BAM system 
t 

fori int i-Oficb.Mfi+t.) 

a« "BAM Matrix ■ « i « "1 \n" « « "W; 


End Listing Two 


Listing Three 

uumuNunmnnu 

U TESTEAM.HPP 

U Interactive BAM System Demonstration Program, u$sd to verify BAM system 
U algorithms and demonstrate them on an abstract (i.e, just Os and Isl case, 
// Developed with Zortech C++ 2.0 — Copyright Cel 1989,90 Adam Blum 





Dynamic String Handling Far C 


Announcing! 


Since 1972, C programmers have waited for 
true dynamic string handling facilities like 
those in BASIC. 


$ 89.95 

30 dtiy unconditional guarantee. 
Available for Microsoft C, Turbo C or Quick C. Visa/MC/Amirx/C.Q.D. 

TRUE DYNAMIC STRINGS 


The bStrings library is 
coded for efficiency - using 
m e mory man age m e n t 
techniques guaranteed not 
to fragment heap space. 


bStrings ; Variable 
length string handling 
that is automatic and 
\u 11 y transparenI. Save 
development I hue. 
Concentrate on your 
program - not on siring 
manipulations. 


Over 100 Functions Covering: 

* Cut * Copy * Paste * Concatenate 

* MidStr * User Input * Search * Replace 

* Buffered file I/O * Low Level file I/O 

No royaltie* ever. 14 Source code available, + Lots of examples. 

COMING SOON -TL4C: The Text Libraiy for C. 

The Worlds Most Comprehensive Text Library For C Programmers 

Robust Text Buffer Management * Hypertext * Real Unix regular expressions ‘Interfaces 10 virtu¬ 
ally all screen management packages. Users upgrading to the full TL 4 C library wil receive credit 
for the full purchttsc price of bSirings. Trademarks arc the property of their respective owners. 

KBM Communications, Inc. 

2401 Lake Park Dr. Ste. 160 All., Ga. 30080 


1 - 800 - 277-0303 


t i nel ude ■ ham r hpp ,r 

vec v; 
veepair AB; 
bam_3ystejn B; 
char *p; 

char pattern-file11£] ="TEST.FIL"; // file where teat data is stored 
int trace-0; // SET TRACE-<whatever> at DOS prompt to turn trace on 
mainj] 

l 

chut « "interactive bam Byitem DemcmstratiorAn"; 

trace-[p-getenv! "TRACE" 1 S^liOr 

cout « "Training from H « patternfile « "\n"; 

B .train(patternfile); 

Dlcout vc "Resulting BAM System\n" <i B;) 

cout «"EnteT patterns as 0 H 5 and I's terminated by comma* \n"' 
<.i”Fatterns moat be length of " « ROHR « " or " « COLS 
« "Hull vector [just to and.\n\n* ; 

for p t H 

cout « "Enter pattern: 
cin » v; 

if (! v* length <) | break; 

if (v. length [) r =B0t#S fit v. length () !=00L5M 
cout « "Mrong lengthAn 11 ; 
continue; 

! 

AB=S.recall(v); 

cout « "Recalled pattern patr\n" « AB, p 

1 

I 


End listing Three 

Listing Four 

1100101911010011.11101010, 

onononmono, noioioi, 

1101111001010101.11110010. 
loiotoiDoooioiiunoonoi, 
ooiiooiioionoiij 1111 oiDo, 

1100101011010011. moioio. 

ouoioomnono/noioioi, 

1101110101010101 . 11110010 , 
lomoioiboiom. uoonoi, 
ooQiomoionoii.imoioo, 

llDOLQlOOlOlOOll, 11101010 , 
ononoiiouono, lioioioi, 

1100111011010101 , lllioan, 
joiooooioooiom ,nooi ioi, 

0 OOnDllDlOllOU r llll 011 O ( 

11001 000 U 01901 1 ( moo uo ( 

QUDllOOmiOllO, imam, 

1101111001010101 , 11110011 , 

1010100000011111 , 11001101 , 

0001100101111011,11111000, 

1100101011010011,11011010, 

0010100111110110,11010101, 

1101111101010101, mifloiQ. 

1010111000010111,11101101, 

0001000001011011,11110100, 

1100101011010011.11101010, 

0110110111110110 , 11010101 , 

1101111000010101 , 11110110 , 

1010100111010111.11001101, 

OOOIQOO101011O11, mioioo, 

0110110101110110,11010111, 

UD 1111 O 0101 QLQ 1 , 11110110 , 

10101 moon 0111 .uoonoi, 

0001000101011011,11110100. 

1100101010010011.11101010, 

0110110111110110 , 11010101 , 

110110001010101,11110010, 

1010110000010111 . 11001101 , 

0011000101011011,11110100, 

0011010101111011,10010111. 

End listing Four 

Listing Five 

P TEST 0 AM.MH 

p Make file for BAM System ImplemervtatlDn tester 
P Usea Microsoft Make 
P Compiler: Zdrtech 2,0 
P To make with diagnostics enabled: 
t make CFLAGS="'-DDEBUG-T" testbam.mk 
1 

CFLAGS- 

.Cpp.obj: 

xtc -c ?(CFLAGS) 5' .cpp 
bafn.obj: bam,cpp bam.hpp 
testbam.ohj: testbam.cpp bam.hpp 
te9tbam.exe; f.eEtbam.oh 1 bam.Obj 
blink testbam bam; 


End Listings 
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This text editing program— 
including pull-down menus, 
scroll bars, and all other 
Windows items—was created with 
just two lines of Actor code. 




Actor " is the fastest, easiest way to develop applica¬ 
tions for Microsoft" Windows. The reason—Actor’s 
reusable toolkit of objects such as dialog boxes 
and edit windows. It more than 
doubles your overall productivity, 
making Actor an essential part 
of any Windows development 
project. 

A full-featured, interactive, 

Windows-based programming 
environment, Actor provides 
immediate compilation, inter¬ 
active testing, and source-code 
debugging. You can use it to 
produce fast standalone applica¬ 
tions that support all Windows 
features, including Dynamic 


Data Exchange (DDE) and expanded memory. 

Actor is a powerful, pure object-oriented pro¬ 
gramming language. It’s all you need to develop 
complete Windows applications. 
You also have the option to 
dynamically link Microsoft C 
code to your Actor program. 

Either way, it’s the fastest way 
to produce everything from proto¬ 
types to complete development 
projects. No wonder so many de¬ 
velopers are already using Actor. 

Call us now for more 
information. 

The sooner you do. the sooner 
you can speed up your Windows 
development work. 



These two lines of Acror code are all it rook 10 
produce the Windows text editing program you 
see above . Just think what you can do with a few 
more lines. 



The Whitewater Group® 


600 Davis Street 
Evanston, Illinois 60201 U S A. 
(708) 328-3800 
FAX (708) 328-9386 


(800) 869-1144 


Two New Products 
For C or Actor Programmers 

WinTrieve™ 

ISAM indexed file manager. Only $395, no royalties, 

Whitewater Resource Toolkit™ 

Edit dialog boxes, bitmaps, icons and more. Only $195. 






























malltalk/V® 
Designed to blow the 
dams off the hybrid languages 
of the programming world. 
Smalltaik/V does prototyp¬ 
ing the same way Shelby 
prototyped the Cobra. , . 
using a blend of technical 
expertise and seat-of-the- 



“Anyone can build a prototype by the 
by the seat of your pants.” - 


Carroll Shelby 

Creator of the legendary 
Shelby Cobra 


pants savvy that’s startlingly sophis- prototype* You test* You tinker. You 
ticated* First you doodle, design, change. And you keep on changing 
dream. Then you explore the pos and test-driving and refining until 
sibilities and begin to assemble the the prototype is just the way it was 

meant to be. With no 


High 


G 

O 

U 

E 

V, 

JJ 

& 
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Pure Object Oriented 
Programming 


SmaUtalk/V 


Hybrid 


Pascal with objects 
C++ 


Traditional 


Low 


High 


Exploratory Capabilities 



achieve this feat without once hav¬ 
ing to go through the old “crash 
and bum” kind of programming so 
common with languages born in 
the age of mainframes. 


compromises. . . of 
any kind* But the 
most remarkable 
thing is this proto¬ 
type is not just a pro- 
to type. It runs, it 
races, it performs like 
the real application* 
Because it is the real 
application. And you 


COMPLEXITY CONTROL FOR 
THE 1990s AND BEYOND. 


The concept behind an object-ori¬ 
ented programming system is rela¬ 
tively simple. You build more 
complex objects out of simpler 
ones. Much as you can build com¬ 
plicated designs with a Lego set. 
With Smalltalk/V a programmer 
can write a piece of code and then 


































Dook. But you create a legend 


c 

obnt. 

Just the name of 
it struck fear 
« into the hearts 
d£racepar j 
drivers of the 


t %Q&, \t Mans,, 
*’ $e bring, Targa 
Flrjfio. 


f 


accents in the 
winner’s circle. 
His philosophy 
was pirn pie and 
salty; 

Tt doesn't 
matter whether 
you Vt jbuilding 
ah outhouse or 
ii can Von don’t 

■ &r 


corkpromise. 

Suddenly 

'4"exa stir awl was f . 

^ replacing Indian $■ 

i :/< ~ : > * 





'('HE “AM I READY EOR 
SMALLTALK/V* CHECKLIST 

□ Does a lot of your work involve 
prototypi ng/exp I ora to ry program - 
ming? 

□ Arc many o fyour problcms di fficu11 
to define? 

□ Arc external factors constantly 
changing? 

□ Do you like to make changes from 
insights gathered along the way? 

□ Do you feel tom between efficiency 
and conceptual clarity? 

□ Are you developing for Multi- 
Finder or Presentation Manager? 

□ Are you tired of needless crashing? 

□ Are team projects getti ng harder to 
manage and complete on time? 

□ Has your creativity been intimi¬ 
dated by the rigorous demands of 
the process? 



Smalltalk/V you can 
write a fugue without 
having to build the 
piano.” 


With SmailtalkW 
your mouse becomes a 
hot programming 
tool far either your 
Mac or your PC. 

You 7 /find that 
Smalltalkfl 7 is souped 
up with lots of other 
high performance fea~ QQpgj LOOK WHAT 

THE WORLD IS 
COMING TO, 


turcs, too. The Class 
Hierarchy Bro wser, 
Inspector, Debugger,, 
Class Browser, 
Method Browser and 
Walk hack window 
are all standard 
equipment. 


“Traditional computer languages 
and interfaces with their structure 
and detail, have appealed to those 
of us who are left-brained (more 
logical and analytical). On the 
other hand, object-oriented lan¬ 
guages and interfaces, with their 
emphasis on perception and the 
whole picture, invite those of us 
who are right- 
brained (more artistic 
and intuitive) to join 
the computer revolu¬ 
tion as well.” 

—Byte 

“Object-oriented programming is 
the key to the next great transition 
in personal computing.” 

—AT Times 


“The software of the 
future, OOP promises 
not only to boost pro- 
reuse it again and again. The “in- grammer productivity hut also put 
heritance” factor lets you create, powerful computing capabilities in 
enhance and refine your applies- the hands of non-techies.” 


AT THESE PRICES IT’S 

CERTAINLY NOT 

MONEY 

THAT’S HOLDING YOU BACK. 

Smalltalk/V 

(DOS5I2K RAM) 

$99.95 

Small talk/V 286 

(286 or 3S6 1.5 MB RAM) 

199.95 

Small talk/V Mac 

(Plus. SE, II I S MB RAM) 

199.95 


tions without constantly having to 
re-invent the wheel. Or, as one 
programmer put it, “With 


—Business Week 


Smalltalk V 


Smalltalk/V. A product of Digital k 
Inc., 9841 Airport Blvd., Los Aigeles, 
CA 90045. For information or to find 
a dealer near you call: 

1-800-922-8255 
i-213-645-1082 

CompuServe 71361,1636 

MulriFimlcr is a Trademark of Apple ( Tam purer. 
Smalltaik/V is n registered troi.k-?mrk of Digi&lk Inc. 

F rices subject to change without notice, 
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Quarterdeck can provide everything you need to put DESQview capabilities into your applications. 


There's a growing realization among programmers that 
for many users, the ideal PC of the future doesn't look 
all that different from the PC of today. Experts agree 
that extended DOS will be the dominant operating 
system for the foreseeable future. 

And DESQview is the best way to create powerful, 
multitasking solutions for the 30 million 
DOS PCs in use today. 

The API Advantage 

Programmers who take advantage of 
DESQview's API (Application Program 
Interface) get easy access to the 
powerful capabilities built into DESQ¬ 
view—multitasking, windowing, inter¬ 
task communications, mailboxes, shared 
programs, memory management data 
transfer, mousing, menu-building and 
context-sensitive help. In short, you get 
all the important benefits promised by OS/2. Without 
the overhead burden and performance trade-offs, 

API capabilities are now available to Clipper, Basic 
and dBASE users as well as Pascal and C programmers. 

Bells and Whistles 

A program taking advantage of the DESQview API can 
spawn subtasks for performing background operations 
or new processes for loading and running other 
programs concurrently It can schedule processing after 
an interval or at a certain time. It can use DESQview's 
intertask communications to rapidly exchange data 
between programs, share common code and data; or 
interrupt at critical events. It can use DESQview's 
menuing and mousing capabilities to create menus. 
And there's lots more it can do, 

80386 Power 

Programmers can take advantage of the 80386's protect¬ 
ed mode for large programs, yet run on DOS and multi¬ 
task in DESQview—side by side with other 80386 and 
DOS programs. The breakthroughs that make it possible: 
DOS Extenders from Pharlap, Rational Systems, Eclipse 
and Oracle and DESQview support of these extenders. 


A Complete Interactive Toolkit 
—Including a Debugger 



Interactive tools like this Panel 
Designer make implementing the 
DESQvmv API a snap. 


API Reference Manual The key to the power of the 
DESQview API, this manual contains all you need to 
know to write Assembly Language programs that take 
full advantage of DESQview's capa¬ 
bilities. And there's an 'include' file 
with symbols and macros to aid you 
in development. 

API Clipper Library Add new power 
to client-server database applications. 
Define tasks that monitor or con trol 
any other application; run reports, 
sorb or numerical analyses in the fore¬ 
ground or background; create custom 
interfaces with control over keyboard, 
mouse and window functions. And 
it's all easy to accomplish because you can treat the 
entire set of over 300 object-oriented API functions as 
prewritten UDFs. 

" Wiffi flic DESQview API , ww cm 
create programs with abilities far beyond 
those of Clipper alone.,, obviously, the uses 
are limited by your imagination" 

—Data Based Advisor, December 1989 

You get the API Reference Manual 
and source code for the library with the 
Clipper Library package. 

API dBASE library Ah API functions 
are available within dBASE HI and IV 
We include source code for the library 
the API Reference Manual and example 
programs. 


Some of the applications 
under development right 
now using DESQview 
API Toots : CAD, medical 
systems, insurance, 3270 
network management, 
mainframe communica¬ 
tions , real estate manage¬ 
ment, typesetting, point 
of sale, education , stock 
and commodity trading 
and online voting , 


Pascal 4.0 and 5.0 compilers and Microsoft Quick Pascal 
Included are the API Reference Manual, source code for 
the library and example programs, 

API C library You get C language interfaces for the 
entire set of API functions. It supports the Lattice™ C, 
Meta ware™ C, Watcom C, Zbrtecn C, C++, Microsoft* C, 
and Turbo C compilers for all memory models. Indudec 
with the C Library package is the API Reference Manua 
and source code for the library 

API Debugger Tire DESQview API Debugger is an 
interactive tool enabling the API programmer to trace 
and single step through API calls from several concur¬ 
rently running DESQview-spetific programs. Trace 
information is reported symbolically along with the pro 
gram counter,registers, and stack at the time of the call. 
Trace conditions can be set to report only calls of interns 

API Panel Designer This interactive tool helps you 
design windows, menus, help screens, error messages, 
and forms. It includes an editor that lets you build an 
image of your panel using simple commands to enter, 
edit, copy, and move text, as well as draw 
lines and boxes. You can then define the 
characteristics of the window that will 
contain the panel: its position, size, and 
title. Finally, you can specify the locations 
in the par 


API Basic Library The Basic library provides interfaces 
for the entire set of API functions. Included are the API 
Reference Manual, source code for the library and 
example programs. 

API Pascal Library The Pascal library provides inter¬ 
faces for all API functions. It supports Borland Turbo 


and types of fields in the panel 

The Panel Designer automatically 
generates all the DESQview API data 
streams necessary to display and take 
input from your panel. These data stream* 
may be grouped into panel libraries and 
stored on disk or as part of your program 

More Tools are Coming If you'd like to 
know all the things we're up to in the API 


Toolkit, plan to attend our API Conference this Summer. 
Call or write for details. 


But for now, we can tell you that we are committed 
to adding tools as needed by our users. In the works, we 
have many new, exciting tools that will keep DESQview 
API users at the forefront of interface development. 



Quarterdeck Office Systems, 150 Pico Blvd., Santa Monica, CA 90405 (213) 392-9851 Fax: (213) 399-3802 
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NEURAL NETWORK ENVIRONMENT 


Listing One (Text begins on page 28 J 

j it Mod*:: LISP; Synt.au: Common.-lisp; Package: andy; Base: 10 


f itt31 f ;; ;; t ;;;;a t; ; i ; t ; J *j r ;;;;;;> t ; r;;: j;; u:11 ;;;;; 

;;; A Research Environment for the Instantiation of Neural Networks 

;;; Andrew J. Czuchry, Jr. — Georgia Institute of Technology 

;;; Georgia Tech Research Institute — Artificial Intelligence Branch 

t*; ii; i j i ; # f f ; j t * n;11 it i j ; j ;; j i ; ; ; t j i ?;! t ; j i ; i ti j i 11 j f t: t : 1 J : J;;;; ?;;; ;; 


Knowledge Representation 


Structure definitions 


(defstruct (NET 

[sprint-function 

layers 

locaI-paramet ers 

) 

(defstruct (LAYER 

{: print-function 
planes i 

e-connectiona 

i^connections ; 

local-parameters 
prev-layer i 

type i 

) 

(defatnuct (PLANE 

(:print-function 
(cells nil :type array) 
e-connections 
i-connections 
e-weights 

i-weights 

size 

local-parameters 
layer 

y 


; structure for a network 
net -printer) I s printer function 

; list of layers 

; list of local parameters for net 

$ structure for a layer 

layer-printer)} ; printer function 
i list of planes 

■ Hat of of J sets for excitatory connections 
: list of offsets for inhibitory connections 
1 list of local parameters for layer 
: *ptr"' to preceding layer structure 
' Layer type (e*g*, "5“ or "C“ rfi 
oeocogn.itxon; "FI" or “F2" in ART) 

; structure for a plane (sub-network) 
plane-printer]) ; printer function 

; cell values for plane 

; list of offsets for excitatory connections 
; list of offsets for inhibitory connections 
i List of excitatory weights (real! 

; (same order as list of connections,! 

; List of inhibitory weight# treat) 

; (same order as list of connections) 

; sire of plane (list N x Mi 

; list of local parameters for plane 

; "ptr" hack to layer of which plane is a part 


Structure Printer Functions — Written by Harold S. Forbes 


;;; The function OBJECT-ADDRESS gets the memory address of any LISP object* 

(defun object-ADDRESS (object) 

;; Symbol ics imp 1 edtent at i on * 

(s y s :%pointer object) 

) 

(defon NET-PRINTER (structure stream ignore] 

(declare (ignore ignore)} 

(format stream "#<net ~K>* (object-address structure))) 

(defun LAYER-PRINTER (structure stream ignore) 

(declare (ignore ignore)) 

(format stream “l<~A-layer ~X>" (layer-type structure) 

(object-address structure)]) 

(defun PLANE-PRINTER (structure stream ignore] 

(declare (ignore ignore}) 

(format stream "4<plane ~X> M [object-address structure)}) 

End Lis ling One 


Listing Two 

;fj Mode: LISP; Syntax: Comnon-llap.* Package: andy; Base: 10 


A Research Environment for the Instantiation of Neural Networks 
Andrew j r Czuchry, Jr* — Georgia Institute of Technology 
Georgia Tech Research Institute — Artificial Intelligence Branch 


Net CREATION functions 
i ji ;, tt i i ;i; 


;; Create a new net* 

; Creates a version of a 5-layer neccognitron by default. 

Tdefun create-NET (fikey 

[num-of-layers 5) 

[ouni-of-planes-per*layer-list 'll 24 24 24 24)) 
(plane-size-list '((16 16) (16 16) (IB 10) (4 4) 

(1 1))) 

(connection-pattern T square) 

(mask-sixe-irSt '((5 5) (5 5) S5 (2 2))) 

(net-parameters * {: 0*5)) 

(additiona1-parameter-1ist 
met-type neocognitron 

(:r-vel-Ust ' (4.0 1*5 1.5)) 

(iq-val-list *(1*0 16.0 16*0)) 

(:b-val-list '(0.0 Q t D 0*0)) 

|:oriegtation-list '(0101}) 

in 

(let* {(layer-list 

(create-layer-list num-of-Layers 

tiLim- o f -pla nes -per- 1 aye t -1 ist 
plane-sire-list 
connectlon^pat tern 
mask-sire-list 

additional-parametei-list}) ; create layers 

; meeting specification 
; parameters 

(net |make-net :local-parameters net-parameters 

:layers layer-list}]} ; create knewledge structure 


) 


net} 


; storing new net 


ti Create a list of NDM-QF-layere layers of the appreciate type (type 
;; key recorded in ADDIT1GNAL-PAEtAMETER-LIST) . 

(defun CHEATE-LAYER-LiET [num-of-layers planes-per-layer-fiat 
plane-size-list con-pattern 
mask-sire-list 
additiona1-pa ramet er-11st] 

(let ((layer-type (zl:lexpr-funcall 4'extract-type-key 

additional-parameter-list)}} 

; determine type of net to which layers are to belong 
; and create appropriate type of layers 
(zl:selectq layer-type 
(neccegnitron 

(create-neocognit ron-la yer-list 
num-ef-layera plaues-per-layer-list 
plane-sire-list con-pattern mask-siie-liat 
additional-parameter-list)) 

(ART2 

{create-ART2-la ye r-list 
nmi-of-1aye rs planes-pe r-laye r-1 1 st 
plane-sire-list con-paLtern mask-sire-1ist 
additional-parameter-list)) 

(backpropagacion 

(Create-backprop-layer-1iSt 
nuni-of -layers plsnes-per- layer-list 
plane-sire-list con-pattern (Msk-size-list 
additional-pa ramet er-1ist)) 

) 

) 

} 


;; Create a list of NUH-DF-LAYERS layers for the neocognitron 

(defun CREATE-NEOCOGN 1 TRON-LAYER-LIST [num-of-layers planes-per-layer-list 

plane-size-list 

con-pattern 

mask-size-list 

additional-pa rame ter-jist} 

; extract parameters specific to neocognitron 

(lef* f[r-val-li#t (il:lexpr-funcall I'extract-r-unl-ltst 

additional-parajueter-list)} 

(q-val-list (zl:leitpr-funcall 4 r extract-q-val-list 

additional-paraJiieter-li$t)) 

(b-val-llst £zl :lexpr-funcall 4 'extract-b-val-list 

addittonnl-parameter-list}J 

(orientalion-List [zl; lexpr-fuiicall f' ext ract-Orientation-liet 
additional-parameter-list)} 

(ninnbe t -o£-pr ocessing-layer s 
(- uum-of-layers 1}) 

(mun-of-s-layers (/ number-of-processing-layers 2))) 

: error checking and layer creation 

(cond ((not (* num-of-s-layers (length i-val-list) 

(length g-val-list) (Length b-val-list)1} 

i check extracted parameters 
(terror "Improper parameters for a net with S-layers: 
r value list = 
g value list * ^s, 
b value list = “s*" 1 

num-of-s-layers r^val-list q-val-list b-val-list)) 

((not (- num-of-layers 

(length planes-per-layer-list) 

(length plane-size-list})) ; check passed parameters 

(ferror "improper parameters for a net with ~D layers: 

Either not enough planes sizes listed in “s, OR 
not enough plane sizes listed in ~s< " 
nurn-Df-laye rs pianes-per-1aye r-1ist 
plane-size-list)) 

((not (* number-of-processing-layers (length mask-size-list})) 

; check projection masks 

(ferror "Improper parameters for a net with “D Layers beyond 
input layer; 

Not enough connection mask sizes listed in “s." 
numbe r-of-prCCoasing-laye rs ma $k-size-1ist}) 

; Create appropriate number of layers* one at a time, and record as a list. 

; For each layer, extract appropriate parameter settings and sizes* 
ft 

(do* HI 1 H i Ut 

|r-val-list r-val-llst (edr r-val-list}) 

(r-val (car r-val-lifltl (car r-vaL-iist)) 

(q-val-li#t q-val-list (edr q-val-list)) 

(q-vai (car q-val-list] (car q-val-llst)) 

(b-val-Liat b-val-list (edr b-val-list)) 

(b-val (car b-val-list) (car b-val-iiat)) 

(rest'Orientations 0rientation-List 

(eddr rest-orientations}) 

(s-orientations (car rest-orientations) 

[cat rest-Orientations)J 
(c-orienrations (cadr rest-orientations) 

(cadr rest-orient a tion s)) 

(prev-piane-num [car planes-per-layer-list) 

(Cadr planes-per-layer)] 

(pianes-per-layer (edr planes-per-layer-list) 

(eddr planes-per-layer)) 

(ntim-of-3-planes (car planea-per-layer} 

(car plane&-per-layer}) 

(mask-list mask-sire-J1st (eddr mask-list)) 

(mask-size (car mask-list) (car mask-list)) 

(plane-sizes-list {edr plane-size-list} 

(eddr p1ane-sizgs-1ist}) 

[prev-c-plane-sire (car plane-3ize-list) 
c-plane-size) 

[s-plane-size (car plane-snes-irst) 

(Car plane-sizes-list}) 

(c-plane-size (cadr plane-sizes-list) 

(cadr plane-sizes-list)) 


create input layer 

(input-layer 

(make-layer 


:planes 


(continued on page 95) 
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epsilon 

■ programmer’s 
editor 

j 9 a e 



has what you’ve been missing... 

Epsilon doesn’t implement its features halfway. When we came out 
with Undo, we remembered Redo. Our extension language doesn’t just 
borrow a few keywords from C, it has C’s syntax and expressiveness. 
Maybe that’s why Epsilon won a BYTE Award of Distinction. 

Compare Epsilon to your editor, and see what you're missing... 


Awuoof ■ | _. 

Distinction 0pSllOD BllGT 


Undo 

and 

Redo 

Complete Undo AND Redo! Any sequence of edits you 
make can be undone, one at a time, with the Undo key. 

You can even undo your undo's with the Redo key. That's 
very important: it lets you casually use the Undo facility. 


Its “Complete Undo" does not let you 
redo. So be careful with that Undo key, 
because it’s irreversible. Once you undo 
something, it’s gone forever! 

Extension 

Language 

Our extension language, EEL, gives you the syntax of C 
and a rich set of data types. All commands are written 
in EEL, and you get source code to all of them. Best of 
all, EEL is fast! 


Its “macro” language has a very limited set 
of data structures (unlike C or EEL). Most 
of Brief’s standard commands were not r 
written in its macro language. Why not? 

Compiler 

Journaling 

When you run another program inside Epsilon, it can first 
shrink to 10K, then run your program. You see your 
compiler run, see the error messages, etc. You can even 
give the prograrfi input. And when your program finishes, 
you're put back into the editor, and a complete 
input/output typescript is there in an Epsilon buffer! 


It can shrink and run your program, but it 
uses command line redirection to gather the 
output of your program. This means that you 
COMPILE BLIND! If there are many error 
messages, you wait until the compiler finally 
exits to see ANY of them! 

Multitasking 

Compiles 

Run utilities, compilers, even the DOS command 
processor concurrently, while you continue to edit. 

If your program is very large, you can use Compiler 
Journaling. 


It has no comparable multitasking facility. 

EMS 

Support 

Epsilon makes extensive use of EMS memory, if you have 
it. It uses EMS both to store what you're editing, and to 
store itself when you swap Epsilon out with a keystroke. 


It will use EMS memory only to swap itself 
out, not to store your buffers. So, you’re 
more cramped for memory than you should be. 


Trademarks: ‘‘Epsilon 11 and Tugaru" are trademarks of Lugaru Software Ltd. "Brief" is a trademark of Underware, Inc. 
Information on Brief is from Ihe manual and conversations with their technical support staff . Versions: Epsilon 4.0, Brief 3,0. 


Epsilon is available for DOS, OS/2, Xenix & 386/ix. Here’s a partial list of features: 


C-like extension language, called EEL 
Source code to all commands 
Convenient multilevel undo plus total redo 
Scans compiler errors (customizable) 

Swaps out of memory for big compilers 
Unlimited file size, number of files 
On-line tutorial for quick startup 
As many windows as will fit on the screen 
Supports large displays (like VGA & EGA) 
Context sensitive help autoconfigures 
Tags package indexes subroutine definitions 
Files can be larger than available memory 
Fuliy utilizes EMS memory 
Interactively customizable keyboard 
EMACS-styfe command set 
Record keystroke sequences 


Source level debugger & profiler for EEL 
Do interrupts from EEL (DOS) 

Call any dynamic-link library for EEL (OS/2) 
Saves deleted text (n times) 

Navigate through your directory structure 
Not copy protected, for your convenience 


Multitasks compilers , even under DOS 
Language support fC, Lisp, etc.) 

Completion on file names, commands, tags ,... 
Full command line editing 
Optional backups 

Regular expression search and tagged replace 


r Ask about our free trial! ^ 

$195 60-day money-back 
dj rec t guarantee! 

Orders & Info: (412) 421-5911 

V_ FAX: 412.421.6371 _ 

Lugaru Software Ltd. / 5843 Forbes Avenue i Pittsburgh, PA 15217 
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NEURAL NETWORK ENVIRONMENT 


'C> 


'C>) 


Listing Two (Listing continued\ text begins on page 28.) 

t c reate-plan e-list 
1 prsv-c-plane-size 
(do ({i 1 [+ i in 

(tinea (apply prev-c-plane-size)) 

(res '{ ( 0 ) ) (cans ' ( 0 ) res} )) 

({>■ i tinea) reg)] 

0 0 1 mask-size *C\ 

:type 'C|) 

; create connections 

( 3-connection-list 

(create-connection-list 1 prev-c-plane-size s-plane-size 
con-pattern cnagk-iize 'S) 

; Connections same for for all planes 
(create-connectaon-liat i preu-c-plane-$ize a-plane-size 
con-pattern maak-size r 5)) 

{c-connection-list 

(cteate-connection-iist 1 a-plane-size c-plane-size 
con-pattern {cade mask-list) 

;C-cells connect one £-plane 
{ereate-connection-list 1 s-plane-size c-plane-aize 
con-pattern (eadr mask-list) 

i oceate planes 
(s-planes 

(create-plane-11 at num-of-a-planea a-plane-size s-connect ion-Hat 

prev-plane-mim b-val s-orientations mask-size 'S) 
icreate-plane-list nurn-of-s-planes a-plane-sito s-oonneetion-list 

prev-plane-num b-val a-orientations maak-size 'EM 

{c-planea 

(create-plane-list (cadr planea-per-layer) c-plane-aize c-ccmnection-1ist 
num-of-s-planes b-val c-orientations mask-size r O 
(create-plane-list [cadr planea-per-layer) c-plane-si?e e-connect ion-list 
num-of-s-plan.es b-val c-orientations mask-size *CJ) 

;assign layers 

(news-layer {make-layer ;ptanes s-planes :e-connect ions s-corinecticm-list 
: local-parameters net-type neocognitron i: H t -v al cq ,q-vsU 

jprev-layer input-layer itype r SJ 
(make-layer :planes s-planes :e-connections s-connection-Hst 
ilocal-parameters 1 [jnet-type neocognitron :r H r-val :q ,q-val) 
;prev-layer (car {last layers]) 

:type 'S)) 

[new- c-layer (make -layer :planes c-planes : e-connections c-connection-list 
:local-parameters l (:net-type neocognitron rr H r-vai :q ,q-val) 
:prey-layer new-a-layer ;type 'C> 
(meke-layer jplanes c-plunea ^-connections c-connection-list 
?local-parameters ’(?net-type neocognitron :r ,r-va! :q r q-val) 
:prev-layer new-s-layer :type J C]) 

; add new layers to layer list 

{layers t S and C layers 

(list input -layer new-s-Uyer new-e-layer) 

(append layers 

{list new-a-iayer new-c-layer))}) 

((>** i num-of-s-layers) Layers))) ; return list of layers 


) 


) 


Keyword and Parameter EXTRACTION functions 

{defun EXTRACT-TYFE-HKY {fikey net-type Sallow-other-keys) 
net-type} ;; Extract the NET-TYPE keyed value 

{defun ExtrACT-R-VAL-LI £ T {fikey r-val-Iist Sallow-other-keys) 
r-val-list) ;; Extract the R.-VAL-LIBT keyed value 

{defun EXTRACT-Q-VAL-L1£T (Skey q-val-llst Sallow-other-keys) 
q-val-list] ;; Extract the (HVAL-LIST keyed value 

{defun EXTRACT-B-VAL-Llfir {fikey b-val-list fiallow-other-keys) 
b-val-liat) ;; Extract the B-VAL-LIBT keyed value 

(defun exTraCt-orIENTATION-l 1ST {fikey orientation-list Sallow-other-keysl 
orientation-list I ;; Extract the ORIENTATION-LIST keyed value 

{defun EXTRACT-NET- (net) ff Extract the parameter from a NET 

(zl:lexpr-funcall # J extract-net- -aux 

{net-local-parameters net))) 

{defun EXTRACT-WET- -AUX (4key 6allow-other-keys) 

} f? Extract the keyed value 

{defun EXTRACT-LAYER-R (layer) u Extract the E parameter from a LAYER 
{zl:lexpr-funcall * r extract-layer-r-aux 

(la yer - loca 1 -pa r ameter s 1 ayer})) 

(defun EXTRACT-LAYER-R-AUX (fckey r 6allow-other-keys) 
r) ;? Extract the r keyed value 

{defun EXTRACT-LAYER.-Q (layer) ;? Extract the 0 parameter from a LAYER 

fzi:Lexpr-funcall * r extract-layer-q-aux 

(layer-local-parameters layer})) 

(defun EXTRACT - LAYER-Q-Alf X (4 key q Sallow-other-keyS) 
q) Extract the Q keyed value 

(defun EXTRACT-PLANE-B {plane) a Extract the B parameter from a PLANE 
(xl: lexpr-funcall D'extract-plane-b-aux 

(plane-locsl-parameters plane))) 

(defun EXTRACT-PLANE-0-ADX {&key b sallow-other-keys) 
b) ft Extract the B keyed value 


Keyword and Parameter INSERTION functions 


{defun INSERT-KEYED-VAL {old-list insert ion-list) 
{do {{list (eddr old-list} (eddr list)} 

(i-key (car insert ion-1ist)) 

(0-fcey [car old-list) (cat list)) 

(o-val [cadr old-list) (cadr list)) 
(result insertion-list 
{append result 

(if {not {equal o-key i-key)) 
(list o-key o-val))))) 
[(null o-key) result}H 


Insert a keyed value 


insert new keyed value 
; keep old valuea 
; for other keys 


End Listing Two 

(continued on page 96) 



G et to the market quicker with graphics that don’t 
compromise performance. GSS® Graphics 
Development Toolkits for DOS and OS/2 give you 
access to more than 100 high-level graphics func¬ 
tions. And your GDT-based applications will support 
over 300 graphics devices. 

Hie GDT is a time-proven solution for programs 
written in C, FORTRAN, Pascal, BASIC Compiler or 
Macro Assembler, It has been optimized through 
eight years of refinement and application to produce 
high-quality, liigh-performance graphics. 


YQU'll Bi M GOOD COMPANY. 

IBM has licensed the GDT for its three PC operat¬ 
ing systems: DOS, OS/2 and AIX. SPCs Harvard 
Graphics and Ashion-Thte^s Draw APPLAUSE use GDT 
technology. So do hundreds of other PC packages for 
science, business and engineering. 

IN A HURRY? 

011(503)641-2455. 

ASK FOR DEPARTMENT DD 

Order your GDT, or ask for a free copy of our 
Devices Supported booklet. The GDT is the most 
direct route to completing your applications—with 
a graphic difference. 


Tte GSS logo and G& an registered trademarks oJ Graphic Systems, Lr>c 
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“gives you ali the C language routines 
you need to write an impressive scien¬ 
tific graphing program of your own. 
Highly recommended” - PC Magazine 


Current Drive Efficiency 



Constant p=8.5* ETR: R 0 =S 79. <o>=1.7, B-4.9, along-2 


PC : $395 (source code) Mac: $295 (no source) 
For personal use only. 

Scientific Endeavors Corporation 

508 N. Kentucky St.; Kingston, TN 37763 

(615) 376-4146 FAX: (615) 376-1571 

CIRCLE NO. 208 ON READER SERVICE CARD 


MODULA-2 


M2 VMS'" Release 4.1-2 

The Reliable Tool hr Software Professionals 


The Modula-2 development system for VAX 
by TERRA Datentechnik offers full flexibility 
within the VMS environment. M2 VMS 4.1-2 
is hosed on the well-known Modula-2 com¬ 
piler by LOGITECH that has recently been 
oquired by TERRA Datentechnik. 

Highlights 

supports the VMS-Dehugger 
supports LSE 

interfaces the operating s/stem 
fully compatible with other languages 
Make Utility 

library as object and source 
cade 

maintenance contract available 

P/ease ask for detailed 
information. 

TERRA Datentechnik also offers 
a large choice of Modula-2 pro¬ 
ducts for PCs. 

TERRA Datentechnik Bahnhoktrasse 33 
CH - 8703 Erlenboch Switzerland 
Tel ++4 I - J - 910 35 55 Fax + +4) • j sro 1 992 
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Listing Three (Listing continued, text begins on page 28.) 

a. j. Hodsi LXSPj Syntax: Coni&oin—lisp; Package; sndyj Rase; ID 

tit A Research Environment for the Instantiation of Neural Networks 

j;t Andrew j. Czuchry, Jr. — Georgia institute of Technology 

tit Georgia Tech Research Institute — Artificial Intelligence Branch 

;; 11ii ;j; t ?;;; t;tt;t ; t ts11i;;;;; u 1*; tn11tt111111tt ; 11t;11ttt1itti:;itt;ii 


t i i ;; ; t 11 ts ,%■;;:;; : ;: i ;; r t 11 r rit ; t i ;t j; ft ;; ii i itt n; t ftt tf t it i i1 Hi tt t titi i 
it; Net TRAINING functions 

; atnm11s t;s:tat ; tatiiiat;;;;;;;;;n 1111 s 11; 11; 11; i ?: 11111; 111 n 111 n 

ll Top level function for training. Trains on all patterns in PATTERN-LIST. 

;; Sets mappings. 

7 Trains on *neocognitron* by default. 

(defun TRAIN-HAIN-LOGP ((key 
(net 'neocognitron*} 

(pat Lem-list (cnapcar f'itea-Hiise (sc1;send Im-pattrns : item-list) ]) 
(iteration-list ’(4 44 41) 
print-data) 

(let* ((net-type (x) :iejrpr-funcan ^"extract-type-key 

(net-locate-parameters net))) 

(iterations [compute-iteration-list net-type i iteration list) 

(actual-its ( iterations 1))) 

(do* Hi 0 (* i I)) 

(condltioned-it-liat (select-iteration-list net-type 1 iteration-list))) 
(terminate-iterations net-type i iterations)] 

(da* ((patterns pattern-list (cdr patterns)) ; loop over all patterns 

(pattern (car patterns) (car patterns)) 

(actual-its (length pattern-list))] 
tcond (print-data 

[format t "“%TV) 

(timeiprint-current-time] 

(format t P “H ** training ~s on pattern ~s. 

(Iteration “d of ^d, “d more patterns.)” 

net pattern i actual-its (length (cdr patterns))])) 

(train pattern net iteration-list) j perform training 


(Create-mappings net pattern-list) t record mapping between pattern and 

i most active "output layer" cell 

leond (print-data 

(format t ■‘TV) 

(timejprint-current-time)) j 

) 

I 

it Trains a net t' recognize a pattern. Returns the plane/cell of the final 
t layer which responds moat actively to the pattern. 

(defun TRAIN (pattern-plane net 

^optional {itera tions-par-layer-list 1 (4 4 4 1])) 

(let* ((layers-to-be-trained (cdr (net-layers net])) 

(n Lint-1 aye rs 1 length l a yers -1 c-he-1 ra l ned)) 1 
rcond f (not !* num-layers (length itemions-pef-Uyer-list))) 

(ferrnr *~1 Improper training iteration count list for 
training “D layers i ‘’s* 

num-Uyers iterations-pet-layer-list)) 

It 

(setf (plane-cells (car (layer-planes (car (net-layers net])))) 
pattern-plane) ; assign input pattern 
(do* {(layer-list (cdr (net-layers net)] (cdr layer-list)) 

: loop over all layers 
(layer (car layer-list) (car layer-list)) 

(iteration-1iat it e rationa-per-1aye r-1ist 
(cdr 1tera tion-1is t) ] 

(iterations (car iteration-list] (car iteration-list)) 

; t times to train layer 
(result (caar (train-layer layer iterations]) 

? train each layer in succession 
(caar [train-layer layer iterationa]J)] 

! (result (caar (update-layer layer)) ) update the layer 

; (caar [update-layer layer)))) 

((null (cdr layer-list)i result)) 

t return most active cell in final layer 

I 

* 

) 

I 

; Trains a layer in a net to recognize a pattern. Continues training until 
; updating layer produces no more changes in the representative list 
ireturned by UPDATE-LAYER). At some point I'd like to remove the 
i ITERATIONS parameter and work only from changes in rep list, but 
; it is computationally prohibitive in th# current version of the system. 

[de-tun "RAIN-LAYER (layer (optional iterations) 

(do* {(old-reps nil new-reps) ; record mast active cell 
(new-reps (updiate-layer layer) (update-layer layer)) 

( re-adjust after training 

(1 D ft i nn 

(for (equal old-reps new-repa) (>" i iterations)) new-reps] 

; check if training complete 

(train-layer-au* layer new-repa)) ; perform training 

) 


t Trains s layer in a net to recognize a patterti 
(defun TRAIN-LAYER-AUX (layer toptional (representative-data-list 
(update-layer layer))) 

(let [(net-type (zl;lexpr-funcall I'entract-type-key 

(layer-local-parameters layer)}() 

; select appropriate training routine 
(slrselectg net-type 
(neocoqnitron 

(t rain-neocognit ron-laye r-aux 

layer representative-data-liit) ] 

[□IAHN 

(t rain-DIANN-la yer-aux 

(continued on page 98) 
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NOW THE CHOICE IS SIMPLE. 


USE THE FAIRCOM TOOLBOX AND 
GET BOTH 4GL SPEED AND 
C SOURCE CODE POWER. 

Whether you need the development 
speed and convenience of 4GL pro¬ 
gramming or the low-overhead 
power capabilities of C source code, 
the FairCom Tool Box can meet the 
requirements of any professional 
developer! 

INDUSTRIAL STRENGTH TOOLS 

Develop applications the way you 
want with The Toolbox's industrial 
strength tools. 

Development Environment by 
d-tree™ 

■ Prototype generation 

■ Data dictionary 

■ Dynamic resource swapping 

■ Screen management 

■ Overlapped windows 

■ File restructuring 

■ Runtime portability 

■ Menu management 


■ Portable. Used in over 100 
environments 

m Variable length key fields 

■ High speed B+ trees 

Report Generation by r-tree*' 

■ Complex multi-line reports 

■ Multi-file access 

■ Complete layout control 
m Conditional page breaks 

m Nested headers and footers 
m Unlimited control breaks 

■ Dynamic format 
specifications 

■ Horizontal repeats 

■ Powerful set functions 

POWER AND FLEXIBILITY 

Now you can create applications 
using the methods you like — 
whether it's 4GL convenience or C 
source code power. You can have it 
all with FairCom's introduction of 
The ToolBox Special Edition. And at 
$ 695 you get this power at a price 
you can afford. 



Hi 


TIIETOOLBOX 


CALL 1-800-234-8180 TODAY 
FOR YOUR FAIRCOM TOOLBOX 

The ToolBox, 

Professional Edition. $ 1,095.00 

DOS, Unix, Xenix, VMS, 

OS2 Full source, single 
and multi-user support. 

The ToolBox, 

Special Edition .... *.„A695.O0 

Microsoft, Borland, Xenix, 

OS2 Object Libraries, single 
user only. 

Upgrade to 

Professional Edition.. s 400,00 

includes overnight delivery. 


File Management by c-tree® 

■ Variable length records 

■ Key compression 

■ Client/Server architecture 

■ Ascendi ng / Desce nd i n g key 
segments 

■ Dynamic space reclamation 


ORDERTODAY 

Order the FairCom Development 
ToolBox and use it for 30 days. No 
risk. If the FairCom ToolBox doesn't 
meet your development needs, just 
return the entire package for a full 
refund. 



FAIRCOM 

corporation 


4006 West Broadway 
Columbia, Missouri 65203 
(314) 445-6833 
FAX (3140 445-9698 
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Listing Three (Listing continued, text begins on page 28.) 


layer representative-dat*-list) |l 

(AKT2 

1 1 rain-ART2-laye r-ayx 

layer representative-date-list)J 
(backpropagatipn 

[t rain-backprop-leyer-eux 

layer representative-data-list)) 


; Trains a layer in a neocogni.tr on to recognize a pattern 

(defun TRAIN-PI EOCOGNITRGN-LAYER-AUX {layer 6optional (representative-data-list 
(update-layer layer))) 

(cond ((> *trace* 3) 

(format t raining layer.'* Chosen Representative list: % s H 
representat ive-data-list)) ) 

[cond [(eq [layer-type layer) F 5| i only train S-layers 

(mapcar 

i F [lambda (representative-data) 

(let* ([plane (car representative-data)) 

[pos (tadadr representative-data}) 

[prev-layer (layer-prev-layer layer)) 

(q-val (extract-layer-q layer)) 

[results 

(do* ((all-connection© (Uy e r- i-connect i ons layer] 

(cdr all-connections)) 

(connections [connections-for-pos layer plane poal) 

; extract connections 
(all-l-vala-liat (plane-i-weights plane] 

(cdr all-i-vals-listf) 

I extract current weights 
(old-i-vals (car ali-i-vals-liat] 

(car all-i-vais-1istl) 

(ell-£-vals-li$t (plane-i-weights plane} 

(cdr all-i-vals-list)) 

(all-i-vala (car all-i-vals-list E 
(Car all-i-vals-list)) 
(all-i-weights-list [plane-:-weights plane} 

[cdr all-i-weights-list)) 
(all-i-weights [car all-i-weights-list) 

[csr all-i^weight3-lint}) 

(ray-result (train-plane prev-layer 

connections old-i-vala 
ali-l-vals ail-i-weighis q-val) 
i perform training on excitatory connections 
[train-plane prev-layer connections uld-i-vals 
all-i-vala all-i-weights q-val)T 
[result raw-result 

(list [append (car result) 

(car raw-result}) 

(+ (cadr result) 

(cadr raw-result))))} 

; record result 

((null (cdr a11-connections)) result))} 

; return result 

(new-i-weight-list [car results]) 

; adjust inhibitory weights 
(new-b-val (* g-vsl (compute-itihib-input (connections-for-pos layer plane pos) 

(c-weights-for-pos plane pos} 
prev-layer)) }) 


► 


(setf (plane-i-weights plane) 

Itranspose-on-type new-i-weight-list (layer-type layer})) 
(setf (plane-local-parameters plane) 

(insert-keyed-val 1plane-local-parameters plane) '(:b „new-b-val})})) 
representative-daLa-list)) 

((eq (layer-type layer] F C) representative-data-list) 

; for C-layers, return representatives 


) 


^Trains a plane' s CONNECTIONS to all planes in previous layer 

(defun TRAIN-RLANE (prev-layer connections old-i-val-Lists all-i-vai-lists 


(do* 


) 


all-i-weight-lists q-val) 

([connection-list connections (cdr connection-list)] 

; extract connections 

[connect i an [car connection-1iat) [C3i connection-list)) 

(c-val-liat a.ll-i-val-liita (cdr c-vai-llst)) ; extract current weights 
(c-val© (car c-val-list} (car c-val-liat)] 

(c-weight-Hst all-i-weight-lists [cdr c-weight-list)) 

(C—weights (car c-weight-list ] (car c-weight-list.)) 

(rev-old-j-vals [revere# old-i-val-lists)) 

(old-i-vals [car old-i-val-lists) 

(nth l- (length c-val-list) 1] rev-old-i-vals]) 

[con-vals (tram-plane-aux prev-layer connection cid-i-vals 
c-vals c-weights q-val) 

(train-piane-aux prev-layer connection old-i-vals 

c-vals c-weights q-val]) ; perform actual training 
Enew-i-weights (list (car con-vals}) 

(nconc new-i-weiqhts 

(list (car con-vals)])) 

(vtotal (cadr con-vals) t+ vtotal (csdr con-vals)))) 

((null (cdr connection-list]) (list (list new-i-weights) vtotal))) 

t return new connection weights 


End Us ting Three 


Georgia Tech Research Institute -- Artificial Intelligence Branch 


11 ; 


;;;;;;;;;;;;;; i:11ti i; 111 ; j31 ;;; 
IDENTIFICATION functions 

r ;;;;;f;;;;;;f; 


; Attempts ta recognize a pattern using NET as a trained net 
; Returns the plane of the final layer which responds to the pattern. 

Ldefum IDENTIFY (pattern-plane net] 

(setf (plane-cells (car [layer-planes (car [net-layers net))])) 

pattern-plane) i assign input pattern 

(let ((result (caar (last [update-net net])])) ; update net 

(if [llstp result) 

[car result]) ,■ return moat active cell of final layer 

H 

; Updates entire net 

; Returns maximum value as nested 3et of lists 
; (((plane (value, pos]) ,.. (place (value, pos)) layerl) 

j (((plane (value, pos)) ,.. (plane [value, po3)} layer2} —) 

{defun UPDATE-NET (net) 

(let ([ (extract-net- net))) 

(do* ([layer-list (cdr {nel> layers net)) (cdr layer-list)} 

; loop over all layers 

(layer [car layer-list) [car layer-list)] 

[layer-max [update-layer layer) (update-layer layer)} 

; update the layer 

{max (list [append layer-max (list layer])) 

; max value ((value, pos] plane},., layer] list 
(append max (list (append ]ayer-max (list layer}))))) 

i append each layer 

((null (cdr layer-list)] max) 

I 

) 

) 


End Listing Fwuf 


Listing Five 

;;; Mode t LIEF; Syntax: Common-lisp; Package: andy; Base: 10 -*- 


t j;U i j;;; i i j;;;i i; a : i t at • t; t; t a r,U7U it f 

A Research EnvirocutenL for the Instantiation of Heural Networks 
Andrew J. Czuchry, Jr. - Georgia Institute of Technology 
Georgia Tech Research Institute -- Artificial Intelligence Branch 
; r, L :; ; 


;:; 


an 


t at; 


;;: ; 


Sample Variables of networks 
mn; a if it t it it ;t i ?;at an: 


instantiated 


[defvar *neDcognitrcn-net* 

J (create-net 

;nLm-of-layers 1 

muin-of-piaoes-per-layer-list ' [l 2A 24. 24 24 24 24} 

; plane-size-list *1(16 16) (16 16) (10 10) (6 6) [6 6) (2 2} [1 1)) 
:connection-pattern 'square 

:tMsk-sixe-list '((3 5) (5 6) ih 6} {5 5) (5 5) (2 2)) 

:net-parameters ' (t D.5) 

:juditional-parameter-1ist *(:net-type neocognitran 

:r-val"list [4.0 U5 I.^Sl) 

:q-val-list {1.0 16.D 16.0] 

:b-val-list (0.0 0,0 0.0] 

:orient3tiofi-liat (81 81)) 

) 

T 

(detvar *neocognitron-net2* 

* (create-net 

mum-of-layers 7 

inum-cif-planes-ner-layer-list * (I 15 20 20 24 20 10) 
:plane-size-list F {(24 24) (18 IB) (12 12) (9 8) (8 6) (4 4) (1 1)} 
iconoectian-puttern 'square 

;mask-size-list F (0 1) (3 3) (3 3) (4 4] (5 S) (4 4)) 

jnet-pacaiiKters 1 (; 0 + 3) 

:additionu.-parameter-list '<:net-type neocognitron 

:r—val-list (3,0 1,0 1,0) 

:q-val-list (10.0 16.D 1B.0) 
:b-val-list (Q.O Q.O D.0) 

;crientation-list (12 1 12 1}) 

} 

) 


End listings 


Listing Four 

;;; -*- Mode: DT5P; Syntax: Common-lisp; Package; andyr Base: 10 -*- 


;;; 


A Research Environment fgr the Instantiation of Neural Networks 
Andrew J, Cxuchry, dr, — Georgia Institute of Technology 
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A production object database for applications written in the 
C ++ environment is no longer a creature of myth, 
introducing our Second Generation Object Database, ONTOS. 
The first and only real object database to support C++ that 
is deliverable and operational at customer sites today. 

Fact is, because ONTOS is ideal for CASE, CAD 
and CAM applications, Index Technology, the country’s 
leading CASE tool provider, recently signed a product 
agreement with Ontologic. As a result, index Technology 
will base future product development on ONTOS. 

This second generation object database fully sup¬ 
ports and is 100% compatible with the C++ language. It is 
performance oriented, delivering 10-1,000 times the speed 
of a relational database system, making it competitive with 
custom-built databases. ONTOS’s open architecture easily 
integrates with your existing development environment 
and supports industry standards including SQL. 

If you thought a production object database for 


C++was too good to be true, now’s the time to call Ontologic 
at 1-617-272-7110, or mail in the coupon below. We’re going to 
make a believer out of you. 

I want the feds on ONTOS. DD4/9 ^' 

□ Please have a salesperson call 

□ Send me more information onyourobjectdatabase product right away. 

Mail coupon to: Ontologic, Inc, Three Burlingon Woods, Burlington, MA 01803{617}2727110 

Name. ______ Title. _ 

Company _ 

Address _ 


J 


City _ 
Zlp_ 


Current O/S- 


Current Hardware - 


_ a State __ 


Oltjeni Database Systems 
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Listing One (Text begins on page 46.) 

f* "union" used to decompose a pointer into segment:offset */ 
typedef struct {unsigned offset; selector sel; 1 ptr $; 
union { unsigned ^pointer? ptr_s ptr; ) ptr_u; 

^A****A**4A*AA-A*AA*********t**A****A***A*****AA*iA#****A********************^ 

* tswit.c “ iKMX II task switch time measurement. 


* Compiler? ic-2ff6 V4.1 (LARGE model)* QL 1989, by R* P* Kar 

/* The lower priority task. It sits in delay loop waiting to be preempted. *{ 
void taskl [) 

(include <&tdia*h> 

i 

unsigned loc_atatus; 

1 include <rmxc.h> 

for (countl * 0; countl <, MAX_LQQP£; count 1++) 


for (i = 0; i < ONE_nCK-f i++) +*spare, r /* Waste time * / 

(define MAX_L00P5 500000L 

printf ("deleting task l\n\n 1 ’); 

rqdeletetask (MULL, tloc status); /* delete self */ 

unsigned el_time r pri, status? 

unsigned long strt sec, end sec; 

] 

selector task! t, task! t; 

/* The higher priority task. When it goes to sleep (once in every loop) iRMX 

unsigned long countl* countZ; 

* makes a non-preemptive switch to the other task; when the sleep period ends 

fldat ts time? 

* this task preempts the other task. 

# / 

/* "union" used to decompose a pointer into segnjentjoffset */ 
typedef struct I unsigned offset; selector sel; | ptr a; 

¥ 

void task2 [> 
f 

union | unsigned ‘pointer; ptr_s ptr; ) ptr^u; 

unsigned lac status; 

for (count2 = 0; count2 < max_lgqps? cdunt2++) 

void taskl (} 

/■ When rgsleep is called, task switch to lower priority task happens. 

i 

‘ When 1 clock period is over, other task is preempted and control 

for (count 1 * 0; countl < MAX LOOPS; count 1* + ] 

• returns to the newt line. 

rqsleep(Q, £status); /* Task switch happens here */ 

V 

rqdeletetask(NULL, istatus); /' delete self ■ / 

} 

rqsleep(i, fclocjitatus); 
printf ("\ndeleting task 2\n“); 

rqdeletetask(WULL, filoc status); /* delete self •/ 

void task2 0 

1 

for (counts - 0; counts < MAX LOOPS; count£++l 

/**H*.*iiAA.**tOi,A*K*i MAIN PROGRAM ***********************/ 

rqsleeptO, 6status); /* Task switch happens here */ 

rqdeletetask(NULL, is tat us); /* delete self */ 

main () 

1 ! 


printf ("\nRreempt ion time benchmarks Each task runs VD times.. .\n\n H , 

MAX_L00P S); 

rtiainO 

/* Measure execution time of taskl and taskZ when they are executed 

i 

* serially {without task switching or preemption), 

A / 

printf (*\nTask Switch measurementVn Each task runs ID t imes *,, \n\n\ 

f 

strt sec - rqgettrme(Sstatkis); /" Start of tuning period */ 

MAX IjOOPSI ; 

for (countl = count} < MAX^LOOPS; count1+*) 


Cor U - 0; it 0NE_TI€K: 1^4) **apare; 

/- Measure execution time of taskl and task2 when they are executed 

for (count2 - 0; count2 < MAX_L0GPS; count2 -m-) 

serially (without task switching), V 

end sec = rqgettime(lstatus); /* End of timing period */ 

Strt sec = tqgettune(istatus); /* Start of timing period */ 

el_tune * (unsigned) [end^sec - atrt_a«c); 

for (countl - 0; countl < WAX LOOPS; CQuntl++) 


i* rqsleep£Q, tstatus) */ ? 

printf (" Execution without premption 4 task switching took £u secondsin", 

for (countZ “ 0; countZ < MAX LOOPS; coumZ + M 

el__time) ; 

}* rqsleepjfl, tstatus) V ; 


end^sec ■> rqgettime(&status); /* End of timing period V 

/* Place a pointer to any variable in union ’’ptr u”, so the data segment 


of this program becomes known. 

ei_tune * {unsigned)(end^sec - strt^sec); 

*/ 

ptr u.pointer =■= 4status; 

/* Place a pointer to any variable in union "ptiu 11 , so the data segment 


gf this program becomes known, *f 

/* Get main program's priority */ 

ptr_u*pointer * b status? 

prr = rqgetprinrity {NULL, iatatua); 

/* Get main program's priority level *7 
pt3 » rggetpriority (NULL, fcstatus]; 

taskl^r “ rqcreatetask [pn+2, taskl, pti_u*ptr*sel, CL, bl2 t £), Sstatus}; 
if (status 0) printf{'"cqcreatetask errorVn"]; 

/* Create two [identical) tasks, which just switch between themselves *f 

task2_t " rqcjreatetask (pri+l> taskZ> ptr_u,ptr. sel/ 0L t 512, 0, Sstatus); 

taskl_t - rgcreatetask [pri+l H taskl, pti_u.ptr.se., UL* 512, D, istatus)j 


if (status ! = 0) printf["rqereatefcask erior'in*); 

Strt_sec = rqgettime(45tatu3); /* Start of timing period */ 

task2jt - rgcreatetask (pri+1, task2,, prc^u.ptr.sel* 0L, 512, 0, istatus); 

/* Set main program' s priority below task I, so they run to ccmpletion ■/ 

Strt_sec = rqge11ime<-fcstatus)? ” /* Start of timing period */ 

t* Set main program's priority below task 1,2 so they run to completion */ 

rqsetpriDnty ( (selector) 0, pn-^3, istatus f? 
tqsleep{ 0, (status ?; 

rgsetprionty £ (selector) 0, pri+2, tstatus ); 

end_s£c = rqgett ime{(istatus] ; /* Ena of timing period */ 

rqsleep [ 0, istatus ); 


end_sec * rqgettime(istatus); /* End of timing period */ 

/* Set main program back to initial priority *■/ 
rqsetpriority( [selectorJO, pri, tatatus ]; 
el_time = [unsigned){end_sec - strt_secj - e1_time? 

f* Set main program back to initial priority V 

preempt_time - ] (floatJel Lime / (float)MAX LOUF:) ) * IDOOOD&.Q? 

rgsetpriotity f {selector)!), pri,, ^status J; 

printf }” Rreemption time + task switch time - 'iS.lf microseoonds\n H , 


preenqit_t iffle) ; 

el time = {unsigned) rend sec - Strt aer) - ei 1 un--r 

ta“time * { (float)el time * 1000000.0 ) ( <(float)MAX_LOOPS * 2.Q] ; 

ciqexit (0); 

} 

printf}" Task swtfccK time = i5,l£ anicrosecQndsXn", ts time}; 

■igexit (0) ; 

End Listing Two 

End listing One 

Listing Three 

Listing Two 

* itncy.c ■** rfiMX II interrupt latency benchmarking program. 

* Method e This program first sets up an Interrupt handler for an unused 


* preempt.c — iRMX II preemption tune benchmark. 

* interrupt level. It then reads the count in the system timer (timer 

• Measures the time for i preemptive task switch + 1 non-preemptive task 

* Jj on the 0254 chip) and simulates an external interrupt to the CPU by 

♦ switch. Compiler: iC-286 V4.1 (LARjSE model), Q4 1989, by R, F. Kar 

1 a caused interrupt instruction. The intenupt handler latches timer O, 

* so this program can read it again after the handlei returns control. 

* Thtt difference id the two timer-count Values is the interrupt latency* 

1 include <5tdio*h> 

* Oct 1909, by A, P. Kar 

(include c«nKc.h> 

)*'•*'*.***»**!*.****** *** A ********* A.AtAAAAA, At* AAA* ************ A. A * + * * f 

/* NOTE: 100/000 iterations takes about 35 minutes on a 18 MHz 300 PC */ 

♦include <stdio*h> 

(define MAX LOOPS iGDOOOL 

♦inelude <mute,h> 

/* Motet This Is a CPU-dependent value, ft must be set such that 

/* Define base addreee of 8254 [Programmable interval Timer) chip */ 

* the execution time for this loop; Eor (j=0; ) < DME_T1CK; g++l spare++ 

* is slightly longer than one 1RMX sleep period* 

-/ 

(define PIT_ADBR 0x4Q 

unsigned status, ticks, timer_cntl, tuner_cnt2; 

(define ONEJTICK 4200 

unsigned dummy_w; 


unsigned char pri, !p_cmtl/ hl_cutl, lo_'-;it2; 

unsigned pri, status, 1, spare, ei_time; 

unsigned long gtrt_sec, end sec; 
selector taskT_t, task5_t, co_cgnn* 

extern void iot_hnc31r(); 

unsigned long countl, countZ; 

/*A*A*AA*A*A*A********A***A* MAD* PR CXI RAM **************************/ 

float preempt_tiraej 

main O 
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I 

pnntf ( “ *** HARKING 4i *\n\rT); 

printf f This program assumes that timer *nd interrupt ccntroner\n "}; 
printfC hardware is fully compatible with the IBK FCMT\»\n # &; 

/* Set up local handler for IR03 on master 8259 *i 

rqsetinterrupt( 0n3B, 0, int_hndli r (selector! Q r istdtus ); 

disable^; /* Disable interrupts */ 

/* Latch and read timer 0 value. Interrupt handler will latch it again */ 
putbyte( PIT_APDR +3, □ 1 i 

/* The following two instructions read the value latched in counter U. They 
are unavoidable measurement overhead and inflate the interrupt latency 
by a few clock cycles. 

V 

lo_cnU = mbyte C PIT_APDR }; 
hijcntl * mbyte ( FlT_ADDft 1 ; 

/* Activate the interrupt handler* It will latch timer 0 and return. */ 
causeinterrupt( 593 ; 

/* The interrupt handler has latched the tinner D count. Now read it. »/ 

la_cnt2 ■= inbyte( FIT_ADDR y ; 

dummy_w = (unsigned int)inbyte< PIT^ADDR ]; 

timei_cnt2 - {unsigned int)lo_cnt2 + (dummy w « 8] t 

enable (}; /• Re-enable interrupts */ 

dummy w * (unsigned intfhi_cntl; 

timer|_cntl = (unsigned int3lo_cntl + (dummy^w « 8] ; 

j* Calculate difference in timer counts (timer counts DOWN to 0] */ 
if (ticner_cntl > timer_cnt2} 

ticks ** timer_cntl - tim@r_cnt2,- 

else /* Rare case when timer has wrapped around */ 

ticks = tio*er cntl + (Duffff - titter^cnt.2 + I] j 


t* Display results V 

printf Interrupt latency - %u timer tiCksXn’*, ticks (j 
/*■ Note that titter is pulsed by 1+19 MHr crystal */ 

print!P =%4.If microseconds\n\n fl , ((float}ticks)/1+19 J; 


rqresetinterrupt( 9x38, & status J ; 
dqexit[0l; 

} 

Listing Four 


End Listing Three 


; latch,asm — Interrupt handler. Merely latches timer 0 m a 
; PC/AT (or hardware compatible computers. 


WAKE latch 


latch segment public 


intjvndlr FROC FAR 
PUBLIC int hndlr 
PUS HA 

XCffi AX, AX 

OUT OK, AL i Latch 8254 counter D 
BORA 
3 RET 

int_hndlt EXOP 
latch ENDS 
END 


End listing Four 


Listing Five 

/*... 

* semshuf.c “ iRMX II semaphore shuffle measurement. 

* Measures the latency [within iRMX) for a task to acquire 

* a aempehore that is owned by another equal-prlority task. 

* Compiler: Intel iC-286 V4,l ffARGE model). Q3 1989, by R. P* Ear 

.....*****«***•«****•**■/ 

Iinclude <stdio.h> 

4include <rmxe.h> 

♦define KWf_LOOPE 10D090L 

emun VESNO [MO, TESf sem_exch; 
unsigned el^time f status; 

selector taskl_t r task2_t r sem_t? 

unsigned char pri; 

unsigned long count1, count2, maxloop2; 
unsigned long 3trt_sec, end_sec; 
float semshuf_time; 

/ k 11 union" used to decompose a pointer into segment:offset. *l 
typedef struct [unsigned offset; selector 3 el;] ptrjs; 
union L unsigned ‘pointer; ptr_s ptr; ( ptr_u; 

void taskl(] 

( 

unsigned ren_units ( tl_status; 

for [countl - 0; count 1 < MAX_LOOPS; count!♦+) 

( 

/* Task waits here until other task relinquishes semaphore */ 
if (aea^exch = YESf 

rem units = rgreceiveunits[ atm t, 1, Oxffff, fitl status ); 
rqsleep(0, itl_status>; 
if (aera_exch = FES \ 

rqsendunits( sem_t, lj 6tl_status 3; 
rqsleep[Q, vLl_status \; 

(continued on page 102) 


Windows? OS/2 PM? 

Save 8 Hours Of 
Repetitive Grunt Work 
Every Time You Write 
A Prototype or Application. 

Winpro/2 And Winpro/PM: The Fastest, 
Easiest Way For C Programmers To Write 
Windows And OS/2 PM Applications. 

Once you’ve created a resource file that describes 
your application’s menus, accelerator keys, and dialog 
box layouts, it will ordinarily take you more than eight 
hours of repetetivc, tedious, error-prone programming 
to create a working program skeleton that incorpo¬ 
rates the resources you’ve defined. 

Now you can go from a resource file to a working 
prototype in just five minutes, with Winpro/2 or 
Winpro/PM. What’s more, you’ll have readable, well- 
commented C language source code that’s more ex¬ 
tensive, more complete, and more suitable for further 
development than the code other products produce. 

FREE TRIAL OFFER: Call us at 201-447-3270 and 
let us send you a copy of Winpro/2 or Winpro/PM. 
Try it for 30 days. If it is what we promise—a great 
time-saver and a valuable programming tool-then 
mail us a check for $395. If For any reason you don't 
want to keep the product, just send it back to us and 
you don't owe us a cent . 

Xian Corporation Call: (201) 447-3270 

S25 North Monroe SI., Ridgewood, NJ 07450 Fax: (201) 447-2547 
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STUCK IN THE SLOW LANE? 



Boih (loppy and hard disk drives have a common problem; Ihey're 
[OO stew. If your time ts valuable,, this should concern you. You 
don’t have to understand words like SEEK. LATENCY or 
ACCESS TIME to know you're betng robbed 

ACCESS TIME to* a htgh-densily, AT-style floppy averages 
91 ms. An AT-slyle hard drive does somewhat better with an 
average access time of 40 ms. 

Forty thousandths of a second may not seem tike much time 
to lose. But consider, in the course of a normal operahng day, 

(his can add up to minuies or even hours of lost productivily. 

This time rs tosl wheUier your computer is a classic old PC, 
running sedalely ai 4.77 MHz, or a spdfy new 25 MHz '3S0 
machine. 

COMPUTING IN THE FAST LANE! 

SemiDisk is a dedicated disk emulator. A SemiDisk looks to 
your computer like an additional disk drive A drive wrth a big 
difference: It’s extremety FAST! Average access times are 
less than 0,01 ms. Our Blue Flamg 11 models are available m 
sizes from 2 to 8 megabytes per single-slot card Multiple 
cards can be used together to form logical doves o( up to 32 
megabytes each Add our Battery Backup Unit and you'll have 
a non-volatile drive that can't be beat. Call or write tor 
benchmark data compiled with PC Magazine's Benchmark 
tests 

Blue Flame II prices start below $5C0 Blue Flame ll cards 
wilh capacities under 8 megabytes are field upgradable in 1 
megabyte steps. The Battery Backup option costs SI 30. Call 
tor information on SemiDisk products lor S-100 and Epson 
QX-10/QX-16 

SemiDisk Systems, Inc. 

P.O Box GG 
Bcavtrxon, Oregon 97075 
,phone [503J 62h-S)QA 
FAX: [503] 643-0625 
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8086/88, 80x86/88 
80386 

■ Fast, reliable operation 
• Compact and ROMabfe 

■ PC peripheral support 

■ DOS file access 

R C language support 

■ Preemptive scheduler 

■ Time slicing available 

■ Configuration Builder 

■ Complete 

documentation 


REAL-TIME 
MULTITASKING 
KERNEL 

68000/10/20 
Z80, 64180, 8080/85 

■ Intertask messages 
R Message exchanges 
R Dynamic operations 

— task create/delete 

— task priorities 

— memory allocation 
R Event Manager 

r Semaphore Manager 
R List Manager 


No Royalties 
Source Code Included 


Manual only $75 US 
AMX 66 $3000 US 

(Shipping/handling ovtra} 

Call for prices for 
Other processors. 


KADAK Products Ltd. 

206-1847 Wesl Broadway 
Vancouver. B.C.. Canada 
V6J 1Y5 

H Telephone: (604) 734-2796 
W Fax: (604)734-8114 
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BUILDING BLOCKS 
FOR THE ASSEMBLY 
LANGUAGE PROGRAMMER 

POWER LIB 


Price $99.95 
With Source Code 
$299.95 



S/H $5.00 
Outside U.S. $15.00 
CA Residence 
Add 7% Sales Tax 
MC and VISA 


Over256Assembly Language Routines 
No Need to Re-Invent the Wheel Every Time 
You Write a New Application 
Permits Faster Application Development 
Overlapping Windowing System in Less Than 3K 
Fast and Compact 
Ideal For Programming TSR's 
C and Pascal Interfaces Available 
MASM 5.X Compatible 


19855 Srevens Creek Blvd. Suite 154 
Cupertino, CA 95014 
(408)244-6826 


ALSO AVAILABLE: 

ASMFL0WS99.95 
An Assembly Language 
Row Charting and Source 
Code Analysis Tool 
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Listing Five (Listing continued , text begins on page 46.) 

rqtieletetask( {selector)0, ttl_statu3 ]; ?* delete self V 

I 

void task2() 

I 

unsigned rem_units, t2 status; 

for |C0UAt2 = 0; count! < KAX_L0QP3; count2++) 

/* task waita hero until other task relinquishes semaphore */ 
if {sem_exch “ YES) 

renwinrts = iqreceiveunits C serajt, 1* Oxffff, *t2status) j 
r qsleap 10, St 2_st at us )t 
if (aem_exchi — YES) 

rqaendunits ( sem_tj l, fit2 status ); 
rqsleep(0, st2 status ]; 

\ 

rqdeletetask( (selector] 1 ?, fit2 status )j /* delete self */ 

I 

HAIN PROGRAM 

main (I 

t 

printf ('"‘inSemaphore shuffle benehinsrk\n %U shuf ties.. .VnAn", MAX_LOGPS*2); 

f* Get priority of main program *f 

pn * rqqetpriorityt (selector] 0, (status ); 

i* Create 2 tasks; measure their execution time WITHOUT semaphore shuffling */ 
sem_exch = NO; 

taakl_t - rqc reate task £ pn+t, taskl, ptr_u.ptT.sel, 0L, 512, 0, fistatus ); 
if (status 1= 0) printf("Create task etrorAn"); 

taak2_t - rqcreatetaek( pri+1, task2, ptr_u.ptr.sel, 0L, 512, Cl, fistatus ); 

strtsec * rggettune (fistatus); /* Start of timing period */ 

/■ Set main program's priority below task 1,2 so they run to completion */ 
rqsetpriority( (selector]0, pri*2, fistatus ); 
rqsleapt 0, Lstatus ]; 

end_sec - rggettime(4status); /* End! of timing period */ 

el_tnpe - [unsigned!(end_see - strt_secj; 

printf{* execution time without semaphore shuffle - tu ,* 

/* Set mind back to original priority level */ 
rqsetpriority[ (selector)Q, pn, fistatuj |; 

sem_t * rqcreatesemaphore{ V, 1, 0, fistatus ); 
if (status I- 5) prjntf("Create sem ■error^* 1 ); 

/* He-create 2 tasks. This time they will shuffle semaphore between them. */ 
sesi_exch * YES; 

taskl t - rqcreatetaak£ prr+1, taskl, ptr_u.ptr.sel, 0L, 512, D, fistatus ); 
if (status r- 0) printf("Create task errcr\n*J t 

task2_t * rqcreatetask( pri+1* task2, ptr_u.ptr.sel. CL, 512, 0, fistatus )j 

strt_a«c * rqgettime(fistatus); /* Start of timing period *f 

/• Set main program's priority below task 1,2 so they run to completion V 
rqsetpriority{ I selector)0, prl+2, fistatus); 
rqsleep! 0, (status I; 

end_sec - rqgettime((status I; /* End of timing period *i 

el_time * (unsigned] (end__sec - strt_see) - el_tinve; 

print!(“ IU semaphored changes took tu seconds^*, MAX LOOPS*2, el_timel 

semahui time - ( (float)el tune ( ((float) KftX_LOOPS ■ 2.0] ) * 100D000.C; 
printff 1 ..... 'IS,If microseconds per ahuflle\n\n\ se#shuf_tuie); 

dqfexit id) ; 

End Listing Five 


Listing Six 


..*.■•*•*•*-....“™******”*\ 

* deadbrk.c — lftKX II Deadlock break-time measurement. 


* A low, medium and high priority task U created. Deadlock occurs 
“ when the following chronological sequence happens: 

1 (U low priority task takes exclusive control of a critical resource 

* (2) medium or high priority task preempts it. 

* [31 high priority task requests resource; gets suspended 

‘ (41 Medium priority task run?, blocking other two tasks indefinitely 

p This situation is handled in iRMX by acquiring a ‘‘region’' before 

* using critical resource, and relinquishing it after use. This benchmark 

* measures the overhead involved in "breaking the deadlock”. 

* Compiler; Intel iC-286 V4.1 fUWGE model). g3 1989, by R. P. Kar 

\...*......*. **+**/ 

finclude <stdio.h> 

I include <nnxc.h> 

Idefine MAX LOOPS 100DO 

f* Note: This is a CPU-dependent value. It must be set such that the 

* execution time for this loop: for !j-G; j <■ DELAY; j++] space++ 

* is slightly longer than one iRMX sleep period. 

*/ 

(define DELAY 4000 


unsigned 
selector 
unsigned char 
enum 


el_time, spare, status; 

taskl t, task2 t, taskd t, reqtont; 

pci; 

YESNO im t YES] dead brk; 
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unsigned long count I, count2, count! r ma.K_l&ops; 
unsigned long strt_aec, end_sec; 
float deadbrk_time; 

/* "union" used to decompose a pointer into segment:offset */ 
typedef struct |unsigned offset; selector sel;] ptr_s; 
union \ unsigned ‘pointer; ptr_s ptr? | ptr_u? 

/* Low priority task */ 
void tasklf) 

t 

unsigned tl_status, j; 
while (i) 

if [count 1 = max_locps) 

[ printf (’"deleting taskL\n*)f 

trqdelatetaaki (seleqfcorlO, *tl status ); /* delete seif •/ 

) 

/* Get control over critical region */ 
rqreceivecontroH region_t, ttl_status ); 

for ij = Or } < DELAY; j++) spare++r /* delay loop */ 

count1+tf 

rqsendcontroi( ttl_status ]; 

\ 

) 

/* Kediuro priority task. Only uses CPU time and sleep periodically. */ 
void taak2() 

unsigned j, t2_status? 

while [1] 

{ 

if (count! " max^loopa) 

< printf (''deleting taskllVn' 1 ); 

rgdeletetask[ (selector)0, fit2_statua ); /* delete self V 

for (j * Or j < DELAY/4; j-H* sparest; /* delay loop V 

rqsleep(l P fit2_status); 
count2++; 

] 

\ 

/* High priority task. Potential deadlock when it tries to gain control 
Df the * region' 1 resource, because low-priority task holds region mostly, 

void task3 [) 

f 

unsigned t3_statua; 

while (1) 

I 

if [count3 “ max_iaops) 

[ printf (‘'deleting task3\0; 

rqdeletetaskt (selector)0, fit! status W /* delete self */ 

\ 

rgsieepd, £t3^atatua); 

/• Ask for control of the region. Relinquish control immediately after 
receiving it. If teskl is net already holding region, this should 
take very little time. Otherwise, 05 must break, deadlock. 

*/ 

if [dead_brk = YES) 

I rqreceivecontrol( region_t, 6t3_status ); 
rq$endcontrol( fits status 1 ? 

\ 

count3++; 

► 

I 


/4±*±i*t+±4*4*4t±****t4 pdain program ******•******•*********/ 
main( arge, argv ) 

unsigned arge; 
char *argv[f? 


if (arge > l) 

max_loops * (unsigned)atoi(argv[l]) ; 
else max^loops = KAX_LOOPS? 

printf("VnDeadlock break time benchmark^ loops.,,\n\n" f max_ioops); 

/* Get priority of main program */ 

pri = rqgetprioxity( (selector)0, fistatus ); 

/* Create three tasks. Task! has lowest priority, task3 has highest. 

* Measure their execution tine WITHOUT deadlocks. 

*/ 

countl = countZ = count! = 0; 
deari_hrk = NO; 

taaki_t = rqcreatetask( pri+3, taskl, ptr^u.ptr.sel, 0L, 512 r 0, fcstatus ); 
if (status !“ 0) printf("Create task eixOr\n*>; 

task2_t - rqcreatetask ( pr.i+2, ta$k2, ptr_u.ptr.sel, DL, 512, G, fistatus ) ; 

ta&k!_t = rqcreatetflskj pri+1, task3, ptr^u.ptr.sel, GL, 512, 0, fistatus ); 

strtsec ~ rqgettimei&statua); /* Start of timing period */ 

/* Set main program's priority below task 1,2,3 so they run to completion */ 
rqsetpriority{ [selector)G r pri+4, fistatus ] ; 

while ( (countl < max_loops) !: (count2 < max^loops) !! (count3 < max^loops) ] 
rqsleepE 10, tstatus ); 


(continued on page 104) 



MetaWINDOW' 'is o complete graphic application development environment that lets 
you tap into your creativity, instead of trying your patience. MetaWiNDOW gives you over 
200 powerful functions that let you work faster and easier than ever before with 
support to over f5populoi C ond Pascal compilers! 


MetoWINDQW provides industry standard PostScript ond X-WIndow style drawing attributes 
and a QuickDraw superset that makes it quick ond easy to port your existing PC & Mac 
applications. And with dynamic runtime support for over J00 popular graphics cords, you 
won't he wasting time with bothersome configuration sessions! MetoWINDOW also 
provides the ultimate in fast graphics and text drawing functions with extensive rasterOp 
flexibility that makes ruhherbanding or dragging complex images a snap! All this, plus full, 
illustrated documentation, free expert technical support, ond royalty-free licensing. 

Call now to receive your free working demo or download direct km our BBS at 
m 4335368! 



i 

torn 


MetoWIHQOW $350 

TarboWIHDOW/O (a fused) SI2S 

QvhkWIHDOW/C $125 

FontWhulow . $125 


Dr Doth 'sJournal , April 1990 


























RHEALSTONE 


Listing Six (Listing continued, text begins on fmge 46.) 


\ 


t 


end_sec 3 rqgettime(4statusj; (* Emd of timing period */ 

el time = (unsigned){end^sec - strt seel; 

printf{" Execution time without 3eadlocks 3 tu secsXn'in",, el_t ime); 


♦include <stdicuh> 

♦ include <nuur*h> 

♦define HAM LOOPS 20U000L 


/* Set maifl{) back to original priority level */ 
rqsetpriorityj (selector) 0, pri, fiststus I; 

/* Create a "region", To ensure mutually exclusive access to a critical 
resource a task must acquire the region first V 
region^t = rqcraateregion( 1, fistatus ); 
if (status N 0) printf("Create region errorXn*): 


unsigned long 

selector 

unsigned 

unsigned long 

float 

char 


s t rt_sec, end_sec; 

taskl_t, task2^t, mbox t; 

pri, el_tiTT»e, Jnsg_ length, status; 

countl, count2? 

it pisg_tiine; 

msg_buf[1D1 - "MESSAGE^", 
tecj _buf [1 ; 


countl = counts = count3 = 0; 
deadbrk 3 YES; 

/* Re-create tasks 1,2,3. Now tasks 143 will compete for region */ 
taskljt “ rgcreatetssM pri+3, taskl, ptru.ptr.sel, 0L+ 512, 0* I status ); 
if (status !- 0) printf("Create task etror\n“y; 

task£_t * rgcreatetask[ pri+Z„ task2, ptr_u.ptr.sel, 0L* 512, Q, fcstatus ); 

task3_t * rqcreatetask 1 pri+1, task3, ptr_u.ptr.sel, 0L X 512, 0* ^status ); 

strt_sec * rqgettime(Sstatus); /*■ Start of timing period */ 

/* Set naan program's priority below tasks 1,2,3 So they run to completion V 
rqsetpriority{ [selector]0, pri+4, 4status]; 

while \ (countl < max_loops) I! (counts < maK_loops) !: {counts < inax_loops) ) 
rqaleept 10, ^status ); 


/" "union 11 used to decompose a pointer into segment:offset */ 
typedef struct [unsigned offset; selector gel;[ ptr_s; 
union ( unsigned ‘pointer; ptr_s ptr; I ptrju; 

/* This task sends data messages, to task 1 that is waiting to receive */ 
void taskl() 

I 

unsigned loc_status; 

for [countl - 0; count1 < MAXLGOPS; count1++} 

( /* Put a serial # on the Brassage V 

msg_buf[0] 3 (unsigned char]countl / 256; 
tq£enddata{ mhax_L, msg_huf, 10, Sloe^etatus J; 

printf("Task I exiting....\n“); 

rqdefetetaek((TOLL, 4statuS]; /* delete self */ 


end_sec - rqgettinratSstatus); /* End of timing period */ 

el^time = (unsigned)(end_sec - atrt_sec) - ei_tima; 

printf{* VJ deadlock resolutions took lu seconds Vn”, counts, el_tin»e); 


/" This task receives the data messages ■/ 
void task2{f 

l 

unsigned loc_status; 


desdbrk_tame ■ [ {float)el_time/(float)counts ) * 1000000.0; 

printf (* ..... kS.Lf microseconds per resolutloMn\n", deadbrk_Lime{ ,* 

dqexit{Q); 

I 

End Listing Six 

Listing Seven 


. . .*.*. . .*“.***j"***\ 

* it_msq,c — iRMX 11 inter-task data message latency measurement, 


* First run the code of two tasks serially {no messages sent). Then 

* create two tasks and a "mailbox" and measure how much extra time is 

* needed to send a fixed number of messages from task 1 to task 2. 

* Compiler; iC-286 V4.1 [LARGE model). 04 198?, by n. p, Xar 


QNX Users! 


Call for catalogue of QNX and 
QNX support software & hardware 

• All Quantum Products 

• Dynaterm Terminals 

• Ethernet: TCP/IP tor QNX 

• LispC 

• Compilers: C, C86, FTN77+, BASIC 

• Menu Packages 

• Development tools including CShell 

• QFAX, BTREE II, Bernoulli Drivers 

• QNX terminal emulation for DOS 

• Screen Blox- Repo rtBlox 


''QNX is- a registered trademark of 
Quantum Software Systems, Ltd, 


T&T Computer Products, Inc. 

QNX Specialists 
P.O. Box 14010 
Tulsa, OK 74159 US. A. 

918/663-1879 FAX 918/663-4054 


MC/VISA 


for (counts - 0; count2 *. HAXLOOPS; counts H 
msg_length = rqreceivedabM Kibox^L, recv_bef, Qxffff, 4loc_status ]; 
print?{" Last message received,,, ts Su (length Su)\n", recv_buf, 

(unsigned) recv_bu H01* m3g_iength ); 

rqdeletetask (NWi, 4atatua>; ~ /* delete sell */ 


. . . MAIN PROGRAM .. 

/* First parameter to ’ , i’qcreatemaiIbox“ --> data mailbox, FIFO queues */ 
♦define MBOX FLAG 0x0020 

main () 

I 

printf (* Inter-task message latency measucementin'"); 
printf; 11 ' Sending $t> data measagea .,. Vn\n 11 , MAX LOOPS); 

f* Set up a mailboK for intei-taak data oommunication */ 
jiib-ox t = rqci ea t email box ( MBOX FLAG, fistatus ); 
if {status ! 3 O] printf {"'rqcre at email box errorWH ; 

kteasure serial execution ticiE of task^ 1,2 {without messages) */ 

atrt_sec = rqgettime(4status); /* Start of timing period *f 

for [countl *= 0; countl < MAX_LOOPS: cound + ^1 
{ /* Put a serial I on the message V 

mag^buflB] = (unsigned char)countl t 256; 
y* cqsenddata( mbox t, msg buf, 10, 4loc status ); */ 

I 

for {count2 = Q: count2 < HAX_LOOPS; count2++) 

/* msg_Iength - rqreceivedata [ mbox_t, recv_buf, Oxffff, Sioc_status ) *0 
end see = rqgettime(4status); /* End of timing period */ 

@l_time - (unsignedHend_sec - strt_see); 

/* Place a pointer to any variable in union "ptr_u M ‘ r so the data segment 
of this program becomes known. 

V 

ptru.pointer = 4 status; 

/* Get main program's priority level */ 
pri = rqgetpriority (NULL, 4statusJf 

ta5kl_t = rqcreatetask (pri+2, task], ptr_u,ptr.sol, 0L, 5t2, 0, tstatus); 
if (status 0) printf ( H rqcreatetask er£OE\n''); 

/ p Task 2 is created with a higher priority than task 1. This ensures that if 
* it is waiting at a mailbox for a message from task i„ it will bo scheduled 
" as soon as the message is sent. 

*/ 

task2_L =" rqcreatetask {pri+1, Lask2^ ptr u.ptr.sei, 0L, 512, istatus); 

strt_30C “ rggettime(&status); /* Start of tuning period */ 

f* Sot main program's priority below task 1,2 so they run to completion •/ 
rqsetpriority[ [selector)0, pri+3, Sstatus ); 
rqgle-ep { 0, istatuft ); 

end_aec = rqgettinse{4status); /* End of timing period */ 

f* Set main program back to initial, priority "/ 
rqsetpriorityf (selector] Q, pri, 4status ); 

el_tlme = tunsigned)[end_eec - strt_sec) - el^time; 
it msg time - ( [float)el_tiJBe * 1000OQ0.0 ] f {f 1 oat)MAX_L0OPS J 

printf7“ Inter-task message latency * task switch time - $6.if 
rrucTOseca\n M , 

it_rasg_time); 

f* Delete maaibox */ 
rqdelelemailboxf mbox_t. 63tatus ); 

dqexit{0); 

) End Listings 
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I can 'write a 4.5 gigabyte OLTP 
database application, with 130 
different record types, that gives 
up to 172 simultaneous DOS LAI 
■users 1-2 second response time. 

AH in less than 640K. 


The answer is 
“MDBS IV 
Developer. 11 
Because the 
database appli¬ 
cation hek 
talking about is 
not only possible, but real It belongs to 
the IIS, Department of Energy's Fermi 
National Accelerator Laboratory 

Fermi Lab needed an on-line mate¬ 
rials handling system to track the millions 
of items used by the D.QE, complex, 
and MDBS IV was the only database 
that allowed them to develop a M-scale 


production application using an IBM 
PC-based LAN. 

No relational database on the 
market could do the job. And even unih 
substantial hardware upgrades, none 
could approach the speed of MDBS IV 

McDonnell Douglas, NASA, Ernst & 
Young, and many others agree. They Ve 
found that MDBS IV is the only way they 
can get real mainframe performance on 
existing hardware under 6401C Whaik 
more, MDBS IV applications are easily 
moved from one environment to another: 
DOS, OS/2, UNIX and VMS. And, of 
course, MDBS IV speaks SQL. 


This person is a (check one): 

□ Dreamer 

□ Shameless Liar 

□ MDBS IV Developer 


©mdbs 


In every major industry successful 
application developers are switching to 
MDBS IV because it lets MIS retain 
mainframe-style control of the network 
without a mainframe size investment 
Applications are easier to write on PCs, 
too, and this helps them stay on top of 
their applications backlog. 

Call 1-800-323-3629 for a free 
technical white paper on MDBS IV plus 
case histories that relate to your industry 
International inquiries, call (317) 447-1122. 
Because, for todays increasingly complex 
database needs, MDBS IV is the only 
right, answer 


MDBS TV * Object/1 * KnowledgeMan/2 * GURU 
1834 Walden Office Square, Suite 250, Schaumburg IL 60173 
(800) 323-3629/(708) 303-6300/FAX (708) 303-6830 

mdhs, GURU MDBS IV K nowledgeMan/2, aixl Object 1 are registered trademarks of mdhs, Inc Other brands and product names are registered trademarks of their respective holders. 


VF91383A/po# 1152 VF9l383B/po#1152 

Dillon & Partners/2-14‘90 Dillon 8 Partners/2-16-90 
great faces/339-2933/kristm great faces/339-2933 /Caroline 
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Over2,500 Software Tools 


‘Emerald ‘Bay 



Vulcan 


3tirt*atei= DfiacpiL 1 !:* .^laga 
m&H' Si+*wi Ri(x}..iS5Sf ,+ns 


s 

g 

Emerald Bay Vulcan 

by Ratliff Software 

Erne*aid Ba/s Vulcan Is a next generation 
dBASE, Both a DBMS language, inlerpreler 
and compiler.Vulcan Includes user-delined ? 

functions, nested reads, mouse-support, £ 
save and restore screens, and multi¬ 
dimensional arrays. If you know the dBase 
language, you know Vulcan, whose 
programs are smaller and eaiser to 
maintain. The compiler is in the 
performance class of Clipper, Foxbasa, 
and Quicksilver, 

List: $395 Ours: $329 

FastFaxts 1747-002 


;iR(f DEVELOPMENT TOOLS 


386 Max 

List 

75 

Ours 

69 

DESQview 386 

220 

189 

FoxHASE +/3S6 

595 

479 

High C - 386 

895 

875 

Hoops exted. DOS MetaWare 

795 

759 

VM/386 

215 

229 

A1 EXPERT SYSTEMS 

ExsyR Professional 

795 

695 

Logic Gem by Sterling Castle 

99 

89 

VP Expert 

219 

219 

AI-LANGUAGES 

ARITY Combination Package 

1095 

989 

PC Scheme LISP- by TI 

95 

85 

TURBO PRGJjOG V2.0 

150 

119 

assemblers 

386 IASM/LINK by Phariap 

495 

Call 

MS Macro Asm 

150 

105 

Turbo Assemblcr/Debugger 

150 

109 


C LANGUAGE COMPILERS 


High C-28G - by Mein Ware 

595 

590 

High C-386 - by MetaWare 

895 

875 

Instant C/1 GM 

795 

769 

Lattice C - 6.0 

250 

189 

Microsoft CS,1 - w/CodeView 

450 

299 

Mieorsoft QuickC 

99 

69 

w/fiehal mouse 

199 

137 

Turbo C - by Borland 

150 

Call 

WATCOM CTO 

395 

329 

WATCOM C7.0 386 

895 

799 

Zortech C 

Call 

Call 

CASE & I'RDTOTYPERS 


Dan Bricklin Demo 11 

195 

185 

Interactive EasyFtow 

150 

135 

Instant Replay - Nostradamus 

150 

139 

Matrix layout - flow chart 

200 

179 

Mela Design by Meta Software 

350 

339 

Pr^C 

495 

429 

ProtoFinish by Genesis 

300 

279 

R&R Code Generator 

149 

129 

Show Partner F/X 

395 

349 



Visible Computer 80286 


100 85 Vi sable Analys t 


MKS Toolkit 

by MKS 

Provides over 150 UNIX utilities 
which can be linked together through 
pipes and I/O redirection to perform 
complex tasks. Includes: MKS Korn 
Shell. Awk programming and 
prototyping language, VI text editor 
plus, sort merge, profiler and menu 
driven installation and configuration 
programs. A 250 page reference 
manual, and 260 pages of tutorials 
provide an excel lent UNIX (earning 
environment. DOS & OS/2. 

FastFaxts 469-004 


BASIC & ADD-ONS 


COBOL 


BAS-C Commercial 

495 

439 

dB/Lib 

139 

125 

MS QuickBASIC V4.5 

99 

69 

PfoBas Lib by Hammerly 

159 

Cali 

ProRefby Hammerly 

50 

Call 

ProSerten by Hummerly 

99 

Call 

ProMaLh by Hammerly 

99 

95 

QBaie 

149 

139 

QuickPak Profession a! 

149 

139 

Softcode/w Tern plain 

100 

89 


MS COBOL V3.0 

900 

Call 

Realm COBOL 

995 

859 

GBMMtJNICATIDNS ADD-ONS 

C Asyneb Lib 

249 

219 

C Asynch Manager 3,0 

189 

155 

Essential Lib by S. Mountain 

329 

309 

Green]e&fCotnm Library 

299 

249 

QuickComm 

139 

129 

DAT AH AST MANAGEMENT 



B (HI ICS/VI BEDS 

Mouse Programmer's Reference 

30 

24 

Programming Windows 

25 

19 

Running MS-DOS, 4th Edition 

23 

18 

Zortech C Video Course 

300 

Call 

Zortech C++ Video Course 

Call 

Call 


Cause by Maxcm 295 259 

CLARION 845 549 

{Professional Developer V2.1) 


dfaFast Windows 
D the data language 
Magic PC 

PC Flu* -Texas Inst rum ents 


395 329 

395 359 

499 479 

2950 1999 


Paradox V3,Q 

725 

545 

Knowledge Pro's Toolkit 

129 

119 

R-BASE far DOS 

725 

499 

R&R Relational Report writer 

149 

139 

Tag Lan Support 

200 

185 

Scrimmage by Synergy - 



Tas Professional 

499 

459 

scree n/menu 

99 

89 

DBASE 



Sycera db - single user 

U1 Programmer - 

495 

479 

Clipper Summer '87 MU 

695 

459 

Dev's Version 2.0 

595 

479 

db/Fasl 

dBASE rv 

99 

795 

89 

Call 

DEBUGGERS/ 



dbFAST Windows 

395 

329 

DISASSEMBLERS 



dbFAST/PLUS 

249 

219 

Dis Doc 

130 

119 

dBMAN V 

295 

275 

Periscope 11 & III ■ 



Force by Sophco 

695 

579 

breakout switch 

Varies 

Call 

FoxPro 

795 

495 

HErSource by Genesoft 

150 

119 

FoxBASE + - V2.1 

395 

279 

SoftProbe 

395 

345 

Quicksilver Diamond 

599 

399 

Sourcer 

100 

89 

Supsbow Professional 

100 

95 

sPORT by WHS 

80 

Call 

DBASE ADD-DNS 

AdCotntn 99 

129 

119 

Trapper 

Zortech C Debugger 

Zortech C+ + Debugger 

200 

90 

150 

189 

Call 

Call 

Artful Lib 

200 

Call 



Code BASF 4 

295 

279 

DEVELOPMENT TOOLS 


dGE - business graphics 

195 

179 

AsmFlow 

too 

89 


The BEST linker for MS-DOS. 

.RTLink/Plus by Pocket Soft 

The only MS-DOS linker with CodeView support for multiple/nested 
overlays. Advanced technology allows more overlays, overlay areas, 
symbols, objects, classes, and sections than any other Tinker. Smart 
caching of most recently accessed overlay sections in conventional, 
expanded, and extended memory (New XMS specifications). 

Easy to use Prof Iter provides detailed performance statistics without 
source code modification, Run-Time Libraries (RTU} speed 
development time and reduce disk-space/modem-time requirements. 
Source code provided for overlay manager and Profiler's read-analysis 
utility. IIBLIST provides detailed information on inter-relationships 
between modules-great for optimising and designing overlay schemes. 
Highest score of all linkers. Reviewed by PC Week 1/29/90. 

List: $495 Ours: $419 FastFaxts 1277-003 


dQuery MU 

495 

469 

FLIPPER Graphics Library 

195 

179 

FUNCcyLIB 

195 

179 

Pro Clip 

149 

125 

R&R Relational Report writer & 



Clipper module 

165 

149 

SilverComm Library 

189 

169 

SilverPaint 

100 

89 

Steve Straley's Toolkit 

180 

149 

Tom Rettig's Library 

100 

85 

DBASE TOOLS 



Buzzwords d Analyst 

295 

269 

CLEAR + for dBASE 

200 

179 

dAnalysl Plus 

195 

189 

Dbase Online - 6 pop-up refs. 

149 

129 

BRIEF w/dBRIEF 

285 

Call 

dRug ■ source debugger 

195 

179 

dBX -dlJASE III to C 

550 

529 

dSalvage 

too 

89 

Gcnifer - code generator 

395 

269 


WATCOM C 



Autoflow C/Pascal 

299 

279 

C Programmers Toolbox 

99 

89 

CLEAR + fer C 

200 

169 

Codan 

395 

349 

dAnalysl for Clipper 

295 

269 

Docum enter 

295 

245 

Inside 

125 

119 

Knowledge Pro 

495 

419 

Knowledge Pro Windows 

695 

589 

MKS Lex & Yacc 

249 

199 

MKS RCS 

189 

175 

Poly Doc'SU 

199 

179 

PC-Lint 

139 

115 

PI ink 86 Plus - overlays 

495 

399 

Poly Make 

149 

135 

PVCS Personal 

149 

135 

PVCS Professional 

695 

659 

,RTLINK ■ by Pocket Soft 

295 

279 

,RTLINK Plus 

495 

419 

Sbrowse 

245 

Call 

Source Print by Powerline 

99 

Call 


WATCOM C7.0 

by WATCOM 


WATCOM C7.Q ts a conptele C development 
system. Offering significant performance in 
the speed and size of oonpifed programs. 
This package includes: ANSI C Optimizing 
Compiler and run-time library, graphics library 
windowed source-level debugger, develop¬ 
ment tools, and express C Integrated 
environment. Important features indude: tig hi 
code generated by the optimizing cornpllsr, 
loop optrmizailons lor oven (aster code, 
remote debugging capability for debugging 
large programs: and compilation and 
optimization of large files. 

MS-DOS 

List: $395 Ours:$329 


FastFaxts 1044-002 




























: or Professional Developers! 


i 


Sourcer w/BIGS Pre-PmC 
TLIB 

140 

100 

129 

89 

Greenleaf SuperFunc lions 
Turbo C Tools by Blaise 

299 

149 

239 

134 

Zorlech C++ Tools 

150 

139 

GRAPHIC ADD-ONS 

Codemaster II 

289 

269 

EDITORS 



Essential Graphics 

399 

349 

BRIEF 

199 

Call 

Graphic 

395 

319 

Edix 

196 

179 

G reen leaf Makeform- DOS 

125 

119 

Epsilon - like EMACS 

195 

169 

GSS Dev't Toolkit 

595 

525 

KEDIT - like XED1T, V/4 

150 

139 

Halo '88 - 140 + devices 

395 

279 

SPF/PC - V2.1 

245 

199 

Hoops 

795 

759 

VediL Plus 

135 

139 

MetaWINDOW 

250 

209 

FILE ADD-ONS 



Mela WINDOW/PL US 

325 

289 



PCX Programmer's Toolkit 

195 

179 

Btrieve ISAM - V5.0 

245 

199 

Piaazz Plus 

149 

129 

Btrieve/N - multiuser 

595 

479 

Quick Windows Advanced 

139 

129 

Xtrieve + - by Novell 

696 

479 

Sunscan 

250 

229 

C-Dala Manager 

150 

139 

Sun show Adv Image Toolkit 

250 

239 

c-tree by Faircom - source 

395 

329 

Sun show C Image 

250 

229 

d-lree - data dictionary 
r-tree - report generator 

495 

295 

459 

245 

NETWORKS 

245 


c-trce - w/r-tree 

650 

549 

Netback 

229 



tm pi \ 

O 

ilCT'# ■ ■■ i#!.** 


■ • 
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§§ 


KnowledgePro 

by Knowledge Garden 

imroctecing the DOOR into WINDOWS. 
KnowledgePro is a high level object- 
oriented language for Microsoft Windows 
or DOS. Inleg rat ion of OOP, Hypermedia 
and Expert Systems technology lets you 
create applfcal ions and Intelligent 
documents quickly. Supports DDE 5 DLL, 
No runiime fees for applications 

List: $695 (Windows) Ou rs: Cal I 

List: $495 (DOS) Ours: Call 

Graphics and Database Toolkits $129 each. 
Call 518-766*3000 with questions, or 

FastFaxts 1419-003 


CBTREE • Source 
CQL - Tull w/ source 
dBC ISAM III - by Lattice 
db_FI LE - network model 
db.RETRIEVE - SQL 
XQL 

WKS library 


195 179 

395 359 

250 229 

Varies Cal] 
Varies Cal] 
795 649 

195 189 


FORTRAN 

FOK C - FORTRAN 77 w/so 875 789 

Fortran Opt. Compiler 450 809 

La hey FORTRAN F77L 595 549 

La hey Personal FORTRAN 95 Call 

MS FORTRAN - CodeView 450 309 

Spindrift - DOS, windows 149 129 

GENERAL ADD-ONS 

C + O Class Library 195 179 

C Tools Plus-VG.0 149 109 

C UtUities by South Mountain 135 137 

Crecnleaf Functions 209 189 


NFTmanager 
cc:Mail 25 user 
DaVinci eMATL 
Netware SQL 
Netware C Interface 

OBJECT- RI ENTER 

Actor 
C Talk 
C Talk/views 
C++ 80386 by Tntek 
Guidelines C++ V2.0 
Smalltalk^ 

ZorLech C ++ 

OS - SUPPORT 

DESQview 

MKS Toolkit - Unix shell 
MS Windows/286 
MS Windows/386 
Development Toolkit/Wind 
Omni View 


1495 1295 
695 649 

995 895 

595 519 

295 239 


695 639 

150 139 

450 419 

495 469 

395 379 

100 85 

200 Call 


130 109 

249 229 

99 69 

195 139 

500 819 

SO 69 



FastFaxts service! 

instant product literature via fax 
24 hours a day! 

Cal! 617-740-0025, from your 
fax machine, and enter 
FastFaxts code. (See Catalog) 

Free Catalog! 

Over 1,750 development tools 
listed. Call for your free copy. 

1 - 800 - 421-8006 

Mention "DD490" 



HALO Window Toolkit 

by Media Cybernetics 
The Windowing Alternative 

HALO Window Toolkit is a gr^jhicaf user 
Interface tool that $pbeds development of 
graphics and imaging applications. 
-Sophisticated memory manager detects and 
uses extended, expanded, or disk memory. 
■ Includes HALO graphics loofkiL 
'Supports variety ol graphics displays: high 
resolution, imaging devices, printers and 
scanners. 

■Practical lime-saver for MS C programmers, 
■Source code compatible development path 
te target DOS and OS/2 operating 
environments, 

Lisl $595 Ours: $519 

FastFaxts 36-024 


GEY286 by Eclipse 

OS/386 by Eclipse 

496 

495 

459 

459 

TURHO PASCAL 

graphics-Menu 

H9 

139 

OTHER LANGUAGES 



Say What 

50 

Call 

Modula-2 Dev. System- 



Topaz 

75 

69 

by Logitech 

249 

229 

TP2C 

249 

229 

RFC 11 Dev. Systems 

1600 

1469 

Turbo Analyst 

99 

89 

TopSpeed MODULA-2 Compiler 100 

89 

Turbo ASYNCH PLUS 

189 

169 

Turbo Prolog V2.0 

1EO 

119 

Turbo Pascal 5,0 by Borland 

150 

109 

OTHER PRODUCT'S 



Turbo POWER TOOLS PLUS 
Turbo Professional 

149 

126 

109 

109 

386 Max Professional 

130 

119 

Tu rbo P rogram m er 

300 

269 

Carbon C&py Plus 

199 

159 



CO/SESSION 

249 

229 

TEXT SCREEN ADD-ONS 


Dan Bricktin'&PagvGariden 

100 

89 

AEWindows 

225 

209 

Du plica ter Tool kit 

80 

75 

C Windows Toolkit 

190 

89 

Faslback Plus 

189 

159 

C Worthy w/forms 

295 

Call 

Fite Shuttle hy GETC 

120 

109 

Greenleaf DataWindows 

395 

339 

Flow Charting 11 Plus 

229 

179 

Hi-Screen XL 

149 

129 

FM-Plus 

100 

89 

Hi-Screen XL Professional 

325 

289 

Headroom by Helix 

130 

89 

Hyperinterface- 



HiJaak 

149 

139 

TFN, C, PAS menus 

100 

95 


CLARION 

PROFESSIONAL DEVELOPER® 

by Clarion 

Professional Developer 2.1 is an fmmensefy powerful, easy-to-use DBMS 
application developer, capable of cutting applications development time 
by 50%. Allows import/export of dBASE SASIC and DIF files; interfaces 
with routines from C and Assembler. Applications generator for creating 
screens, menus, windows, reports, and tables. Includes Report Writer for 
creation of ad hoc reports and queries. Comes with built-in LAN support, 
with no run-time system required for distribution. Recent winner of 
PC Week poll of corporations using programmable databases. 


List: $845 


Ours; $549 


FastFaxts 1005-004 


109 

89 


Hyperpad by BrighLbill 149 129 

LapLink III 150 129 

Link & Locate ++ - ROM MSC 395 349 

Math Advantage 495 475 

Mirror II 70 59 

Net Lib 249 Call 

Norton Commander 149 119 

Norton Utilities Advanced 150 

Pagi nate by Accuma tic & 100 

PC Anywhere III 145 129 

PC Tools Deluxe 129 109 

PC Kwik Power Pack 130 119 

QEMM-386 100 89 

Remote^ 195 139 

Resident C by South Mountain 99 85 

w/saurce 249 199 

Service Diagnostic Kit 195 Call 

5MX (College) 95 Call 

SpinRite II 89 Call 

Time Sheet 150 135 

Coterm 220 245 219 


JAM by JYACC 595 469 

MEWEL 179 149 

POWERSCREE N by Blai so 149 109 

Vitamin C - source, menus 225 169 

VC Screen - pain ter 149 139 

YcrmonL Views-Qbj+Sourco 890 819 

Zortech Pro Screen 70 Call 

vmxmimx 

Application Devel, 2 user 1445 1349 

Edix - editor 425 399 

ESIX/V 386 Devlp <2 user) 595 569 

Guide! ines C++ For V/386 V2.0 495 4 79 

Inform ix SQL 995 919 

JAM JYACC Applic, Mgr, many Call 

NDF Fortran-386 795 749 

Network Developer 2 user 1495 1399 

Vermont Views 1595 1349 

Workstation Devel, 2 user 1995 1869 

Workstation Starter 2 user 495 469 

XENIX 286 Complete System 1495 1279 

XENIX 386 Complete System 1595 1369 


Credit Card orders processed only when product is shipped „ 


SHOP • 800 - 421-8006 

5 Pond Park Road, Hingham, MA 02043 • Canada 800-446-3846 • MA 617-740-2510 • FAX: 617-749-2018 
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TurboGeometr 



Library 


A Library of 2D & 3D Geometric Routines 

New 3.0 upgrade! Twice as many 2D and 3D geometric 
routines (over 300}. Now with: Surfacing • Solids ■ 
Spherical Geometry ■ 3D Clipping • Tangents. Also 
includes additional HideUne algorithms * Intersections 
* Volumes * Areas • Transforms • Perspectives * 
Decomposition * and more. Easy to use manual. 30 
day guarantee. $199.95 with source, S&H incl. Foreign 
$225.00, S&H incl. TurboGeometry Library 3.0 is 
available in Turbo Pascal, Quick Pascal, MSC, Turbo C, 
Power C H Zortech C. Needs MS/PC DOS, IBM/PC or 
Compatibles. We accept VISA, MasterCard, PO, Chk 
USA negotiable funds only. 


Disk 

2116 E, Arapaho Rd. SoftWCOT, 

Aa~t * ^ j 


Suite 487 
Richardson, TX 75081 
USA 


214 423-7208 
214-423-7288 FAX 
800 635 7760 


CIRCLE NO. 117 ON READER SERVICE CARD 


You’ll never use malloc again! 


Venn Dynamic Set Manager 

Powerful Storage Management 

- Unlimited Size A mays /Structures ( Data Sets ) 

* Transparent Migration: Expanded Memory/Disk 

* Automatic Storage Size Adjustment 

- Transient or Permanent Data Sets 

Direct Storage References 

■ Local Windows into Any Region of Data Set 

* All Standard C Operations on Local Windows 

Intelligent Operators 

* Compare and Copy 

’Any Set, Any Size, Any Storage Combination 

Relational Style Operators 

* Restrict, Intersect, Sort, Delta, and more 

* Find Matches 

* Create Subsets 

- Sort Data Sets 

* Perform Updates 

Easy To Use 

* Simple Declarations 

* Sample Applications 

* One Linkable Library 

* Microsoft C and Turbo C Versions 


GD 


V, 


ONLY $129.95 

ENN SET PROCESSING SOFTWARE 
1 -800-628-8369 P.O. BOX 1008 

VISA/MC ANN ARBOR, Ml 46106-1008 


listing One f Text begins on page 56J 

i * FQfJtl STBUCtmtE bEFINmOHS */ 

struct fontlhead | J * standard character Cant header */ 

unsigned char fnt type; /* font structure type: V 

/■ nan-compressed type - 0x1 & sir compressed type m Oxl4 V 
char £fttna»e[13]!; /* font name: always followed with a '.set' extension*/ 

unsigned char fntcheck; /* check digit: verifies a Pate Transforms font: V 
/* nan-compressed font - Oxba, compressed font * Qxdc */ 
unsigned char fntbase; 

/* baseline count (in pixels) from top to bottom, top * 0 */ 
unsigned char fnttotal; /* total characters m font:*/ 

/* United to the lower *4 ASCII characters: 0x21 - OxTE *( 


/* starting character *( 
proportional or non-proportional: 0=non-prop, *7 
/* horizontal call size in pixels */ 

/* vertical cell Size in pixels *f 
/* number of horizontal bytes in current call'/ 
/* space bar horizontal size in pixels V 
/* pixala between characters default */ 

/* pixels between linefeeds default */ 

/* total length of file V 
/* italics pitch (0 - none) */ 

... number of scan lines to ship */ 

0 * decrement xpos T 1 = increment xpos */ 

/* 0 * dont invert, 1 * invert */ 

/* number of overlapping bits horizontal */ 

/* number of overlapping bits vertical */ 

/' Integral horizontal hit magnification */ 

/* integr&l vertical bit magnification */ 

/* fractional horizontal bit magnification */ 
/* fractional vertical bit magnification */ 


unsigned chat fntstart : 
unsigned char fntstatus? /' 
unsigned char fnthsize; 
unsigned char fntvsize; 
unsigned char fntbytes; 
unsigned char fntspaceh; 
unsigned char fntehargap; 
unsigned char fnt If gap,- 
int fntlength; 
unsigned char fntpitch; 

/* bits 0 - fi . 

/•bit 7 ... a 
unsigned char fntinvert; 
unsigned char fnthbold; 
unsigned char fntvbold; 
unsigned char fnthmag: 
unsigned char fntvmag? 
unsigned char fnthfract? 
unsigned char fntvtract? 
unsigned char fntdirection; 

/* Print direction D>-le£t to right, 1. .3-counterclock */ 


unsigned char fnt tot 90,’ 
unsigned char fnthflip; 
unsigned char fntvflip; 
unsigned char fntcolor; 

/' bits 0-3 
/* bit 0 
/* bit 1 
/■ bit 2 
/• bit 3 


t* bit % 
/' bit 6 
/' bit 7 


,♦3 */ 


/* rotation 0-np, l.♦ l-eoum ere lock 1, 

/* horizontal flip 0 * no, 1 * yes */ 

/* vertical flip 0 - no, l = yes '/ 

/* eoioi of font •/ 
foreground color */ 
strike black ribbon “/ 

... strike blue ribbon */ 

♦ * strike red ribbon ■/ 

.. strike yellow ribbon */ 
f* bits 4 - 7 ... background color '/ 

/' bit 4 ... strike black ribbon ■/ 
strike blue ribbon */ 

... strike red ribbon */ 
strike yellow ribbon */ 
unsigned char fntsubtype; /* lubcategory type of this font */ 

/* 0 - normal font subtype */ 

/* l * equation roman font subtype V 
/' 2 - equation symbol font subtype ■/ 
unsigned char fntunusedllflJ: /* unused bytes */ 
it 

struct fontl i /* standard character font (type - 0xi6) '/ 
struct fontlhead fhd? /* font header •/ 

char 'fntcellptr[fOKTiTm , Ah + l|j 

/* offsets from beginning of file to character bitmaps *7 
char fntcellwldth [FOftT 1TDTAL * 1 ] • , " leil widths if proportioned */ 

If 

End Listing One 


Listing Two 


i* font header */ 


/• F0NT2 STRUCTURE PEFIRITIOWS */ 

struct font? I 

Struct fontlhead fhd/; 

unsigned int fnt2cellseg | F£)WT2fOtsi. + 1|? 

/' array: segment pointers to characters'/ 
int fnt2cellhsizeJF0NT2TOTAL +■ 1]; /* array: :eli horiz sizes in hits */ 

int fntScel Ihoffset frafT;'TOTAL + 11; •" array: cell horiz offsets in bits*/ 

int fnticellhbytes [FQKTT/TtJTAL * i|: /* array: cell honz size in bytes *7 

int fnt2cellvsize£FDKT2TQTAl + 1J; /* array; cell vert sizes in bits */ 

int fnt/ceilvoffaet[FONT2TOTAL * 1]? /" array: cell vert offsets in bits */ 


End Listings 
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EXAMINING ROOM 


Listing One (Text begins on page 72j 


/**"** ******* *.*„**±***«*.,,** *******.*'*** + •<'**.«». I-**"**.* 

File: KabooGom.-g 

Purpose; Allows the user Co 'walk' through a minefield; a detector shows 
how many mines are immediately adjacent to ydLi. Ad you visit a cell, it 
leaves a marker telling you how many were next to you, and you have the 
ability to mark cells with a character [assmiiably to mark mines) . 

Changes: 

11/10/09 (rdeiil if you call the program with m /s” or "/5", it grves 
you a '’safer" gam?, where it does not let you walk mi spaces that you 
have marked (whether there is a mine there or not!] 

11/11/39 (tdeii) Allows you to press 41 ?" and get some help starting at your 
current position; will mark mines that it knows (by deducing their position], 
and "visit 11 places that it knows are safe. This propagates until it cannot 
deduce anything else (see EvalusteFOSitionK 

.......... . . . .. 

(include "stdio T h” 

Jin elude "stdarg.h" 

Jinclude "srdlib.h" 

Iinclude "dos,h” 

(include "emtio i h“ 

(include "string.h® 

(define SCAEEN_X 00 
(define SCREEN V 25 
(define GRiflX' lb 
(define GRID_Y 9 
(define TRUE i 
(define FALSE 0 

(define bEHPTY 0 
(define bVISITED 1 
(define bBOMB 2 
(define bCURRENT 3 
(define bFINISR 4 
(define bEXPLODED 5 

(define MAKECOLOR{tore,tack) <{back]* 16+(fore)j 
typedef int BOOL; 

typedef struct tagADJACENCYGRQUP ( 

int BombCount; /* Number of bombs Located in this ad} 

int celiceunt; /* Number of ceils filled 

int Cell[0](2]j /* x,y coordinates of up to 8 telle 

> ADJACENCYGROUP; 


. group */ 

•f 

*/ 


int Board[GRID_X][GRIDJY ]; 
int UserMark[GRID^X]tGRID 3Y]; 
int nNumMines; 
int UserX, UserY; 

BOOL hShOwBombs; 

BOOL bSafeGame; 

AD J ACENCYGROlf P Ad j acencyG roup [GRID 
Char gzClear[70] = " 
w i 

void Pause(void) 

[ 

if (getch[) *■ 0) getcht); 

i 


/* Board; see codes above (bXXX) */ 
f* User marks; 0 - none, 'M' * mine */ 
f* Number of mines on board *7 
/* Current user X and Y position */ 
/“ TRUE if program shows bombs (it "/ 
/* does this after you win Or idee) */ 
1* TRUE if program does not let you */ 
/* walk on mines you have marked '/ 
{GRTD_Y]/ /* AG for each board pOS *7 


void GetX¥_(int *pX, int 'pY) 

union PEGS regs; 
regsah = 3; 

regs.h.bh - 0; /* display page 0 */ 

int86(0x10, Gregs, Gregs); 
if (pY |= NULL] [ 

I *pY) * regs.h.dh; 

1 

if (pX I* NULL! [ 
l*pX) = regs.h.dl; 

1 

s 

void GotoXY_(int h, int y) 

I 

union REGS regs; 
regs.h.ah = 2; 

regs.h.dh * (unsigned char)y; 
regs.h.dl = (unsigned charjx; 

regs.h.bh - 0; /* display page 0 */ 

intSMOxlD, Gregg, Gregs); 

) 

int nPandom(int nW&x) 

1 

return ((int){(double)rand(> / RAND_MAX * (double)httex)); 

) 

void DisplayChar(int k, int y, char cChar, int nColor) 

\ 

char far "cPos; 
if ((x>=0 fc& x<SCttEEN_X) GG 
[y>-0 IG y<SCREEN_Y )) I 
cPos = MK_FF( OxQbflOO,I(x + y*0G] « l)}f 
*cPos = cChar; 

*■ (cFos*l) - [char)nColor; 

) 

1 

int CountMines{int x, int y) 

[ 

int i, j f 
Lnt nCount f 
iiCcmnt =0; 

for (i=—1; K=l; i++) I 
for (j—1; jol; j++) \ 

If (fxti ?= 01 G£ (X+i < GR1D_X] 6:4 
(y+j >- 0] SF jyt} < GRTDJfl ) | 
if ((Board[x+i] [y + j j = bBOMB] ;! 

(Board[x+il[y+jl == bEXPLODEDl) \ 
nCountM; 


\ 

\ 

return {nCounU; 

void DiSplayCetl lint x, int y] 

1 

int Char; 

Char = UaerMark[xj[y]; 

if (Char -= Of ( 

Char = 32; 

I 

DisplayChar( h* 4+1, y*2+l* Char, MAKECOLOR{14,1}); 

DisplayChar[x t 4*3, y*2+l. Char, MAKECOLOR|14,1}); 

switch (Board[K|[y]) I 

case bEMPTY: /** Empty cell **7 

Char = * * i 
break; 

case bVTSITED; {** Visited cell **/ 

Char - 'O' + CountMines(x, y); 
break; 

caae bBOMB: /** Bomb cell! **/ 

if (bShowBombs) | 


Char = IS; 

I else E 

Char =' '; 



i 

break; 

Case bCURRENT; 

Char - 2; 
break; 

/** Currant pos 

*+f 

case bFINISh: 

Char = 19; 
break; 

/** Finish cell 

“•/ 

case bEXPLODED: 

Char = 15; 
break; 

/*“ Explcwdedl 

**/ 

if {Char 1= 0) l 

DisplayChar(x*4+2, y*2+l, 

Char, MAKECOLOR (14,1)) ; 



1 

] 

void. Ifiit iali z e (void) 

i 

unsigned int nRand: /* seed for random number generator */ 

struct dostime_t sDosTime; /* time structure; used for above seed */ 

dcu get time (isDosTiffiel ; 

nRanB » (unsigned int)((sDosTime.hsecond * tQO) + 

CsDo^Time,second * 10) + 

(sDosTime.minute / 6)); 

siandinRand); 

I 

void PaintBoacd(void) 

int x, y, i; 

for [x«0; xc3CP£E«_X; x++] [ 
fot [y=0; y<£CREEN_Y: y*+] [ 

DisplayChar( h, y, ' MAKECOLOR{14, 1)); 

) 

] 

/** Draw left and right sides- **j 

DisplayChar (0, 0, 21$, MAKECOLOR (M* H); /“upper left corner */ 

DiaplayChar(GRID_X*4, 0, 191j MAXEuOiOR[14,U); /*upper right corner 
for {y=l; y<=GR3D_Y; y++) { 

DisplayChar [0, y*2, 195, MAKECOLOR(14,1)); 7* left edge *i 

DisplayChar(GRID X*4, y*2, 100, MAKECOLORU4,1]); /* right edge *f 

i 

DigplayChartO, GRID_Y^, 192, MAKECOLOR (14, If); /* lower left corner */ 
DisplayChar(GRID_X*4, GRID ¥*2, 217, MAKECOLOR[14,1)); /"lower right */ 

/** Draw inaide corners **7 

for (x-1; xcGRID X; x+4) [ 

DisplayChar{ k* 4, 0, 194, MAKECOLOR(14,1)); /• top edge •/ 
for (y* 1; y<GRID^Y; y++) I 

DisplayChar{ k* 4, y T 2, 197, MAKECOLOR(14,1)); /* intersectiona */ 

\ 

DisplayChar{« T 4, GRID_Y*2, 193, MAKECOLOR(14,1)); /■ bottom edge */ 

/** Draw connecting lines *“/ 

£et (x=Q; x<=GRID_X; ml ( 
for (y-D; y<-GRID Y; y++) [ 
if [y ! = GRIDJiT I 

DisplayChar <x*4, y*2U, 179^ MAKECOLORU4, 1] ); /* verticals */ 

} 

if (x h GRID X) | 
for (i-1; i<4: i++) [ 

DisplayChar(x*4+i, y*2, 196 , MAKECOLOR(14,I)); /* horizontals */ 

] 

} 

1 

f 

GotoXY_{0, RCREENJ - 1); 
for (x*0; k<GR1D_X; x++> I 
for (y=Q; y<GR.lD_Y; y++) { 

DisplayCelUx, y] ; 

\ 

f 

! 

void SetUp&Qard(void) 

i 

int x, j,* 
int nMines; 
bool bDone; 
char cBuffecESOl; 
bShQW&sanbs - FALSE; 

/** First, get number of bombs **/ 
nNuir#4±nes - D; 

while ((nNuiiiMines < 10) ! : (nNuirdines > 40)) [ 

GotoXY_(0, 24); 


(continued on page 110) 
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Listing One (Listing continued, text begins on page 72 J 

lot Ch; 

int NewX, NewY; 

printf (•'How many bombs do you want? (10*4£11 ?? *); 

int dx t dy; 

fgetsicBuffer* 3izet>f icBuf far) r stdin); 


sscanf (cBuffer, ''Id", inNypifttr-es] ; 

hAborc = FALSE; 

1 

GotoXY (0, 24); 

/** next, clear out hoard t user scratchpad **f 

print f(*Ma.rk in which direction? (ESC-aboct) *); 

for (i-G; icGRlD X; i-K| \ 

bDone = FALSE; 

for fJ-0; j<GRID Y; j++) \ 

while {IbDone) 1 

Board.fi] [jl = 0; 

huone - TRUE; 

Usertterk[i][j] - 0; 

Ch - get ch|); 

I 

switch (Ch) [ 

\ 

case 0: 

for jnMines^D; nMines<n>fLiraMine 5 ; nMines+tf f 

Ch * getchO; 

bDone - FALSE; 

switch (Ch] | 

while IibDone) ! 

case 71- /* home */ 

i * nRandomjGRlB X); /* First you roll it, */ 

dx ^ -lj 

} - nRandora(GRID Y); /* Then you pat it, */ 

rfy = -It 

if f (Soardfif 1 5J = hEMPTY} it 

break; 

(1 Hi <- 11 st fj <- 1)1) it 

cas# 72; /* up arrow */ 

(Kfi >- GRIG X - 2) it (j >- GRID Y - Z))J 

dK - 0; 

) I 

dy - -1; 

bDcne - TRUE; 

break; 

1 

case 73: /* page up *7 

) 

Ax = 1; 

Boerdfi]fj] - bGGHB; /* Then you mark it with a *B f */ 

dy - ”1; 

\ 

break; 

t* Set user at position 0, 0 */ 

case 75; left arrow */ 

UserX - 0; 

dx - -It 

UserY = 0; 

dy =- Df 

Board 10] [□] - bCURRENT; 

break; 

/' Set finish (hq) at positron GRID X, GRID Y ■/ 

case 77: t* right arrow */ 

Board;({SID, X - if [GRID Y - t] = bFJNISH; 

d* = 1; 

f* Display board on screen *} 

dy » Dj 

PaintQoardO f 

break; 

J 

case 75; /* end •/ 

BOOL Travel!int dx, int dyl 

dx - -1; 

1 

dy - li 

int NewX< TiewY; /* hew X and Y coordinates of user *t 

break; 

BQOL blnvalid; i * TRUE if trying to walk off board *i 

case 80: /* down arrow */ 

BOOL bAbort; /* TRUE, if uaer won or lost [abort game] •/ 

dx » 0; 

BOOL b&omhwalk; J* TRUE if user tried to walk on a bomb *t 

dy = U 


break; 

bAbort = FALSE; 

case SIe /* page down *7 

KewX - User* * dx; 

Ax = U 

NewY * UserY * dy; 

dy - I ; 

blnvalid = FALSE: 

break; 

bflcwbWa1X - FALSE; 

default: 

if flNetrf < 0) [ I !MewX >- GRID X] ) I 

bUone - FALSE; 

blnvalid * TRUE; 

break; 

if ( !WewY < 0) ! ■ !NewY >- GRID Y) \ | 

\ 

break; 

blnvalid - TRUE; 

case *7 *i /» home */ 

J 

dx * -if 

if USfclnvalldJ it [bSafe&am*) it {UserHarkfNewXj [N*wY| = ‘ K + > ] | 

dy - -is 

bInvalid « TRUE; 

break; 

bBombHalk - TRUE; 

case ‘S'; /* up arrow V 

1 

dx - 0; 

if 1 binvalid) | 

dy - -If 

GotoXY [0, SCREEN Y - 1); 

break; 

print n - ** INVALID MOVE ** ... press any key..."); 

case ‘9*: /* page up */ 

if IbBombWalk) \ 

dk - 1; 

print E (" (You must un-tnark it„|*); 

dy * -if 

1 

break; 

Pause O r 

case *4': /* left srrcw */ 

Gati>X¥_ |0 f SCREEN Y - 1); 

dx - -1; 

printf(azClear) ; 

dy - D; 

\ els# \ 

break; 

it (BoardlNewX] [bfewYl = bBQMB) \ 

case ‘S'; /* right arrow *t 

bAbort = TRUE: 

dx * lj 

Boa rd [ UiserX ][ UserY ] = bVISITED l 

dy - D; 

UisplayCell(UaerX, UserY] ; 

break; 

Board[NevX|[NewY] = bEXPLODED; 

case *1"; /* end ■/ 

DisplayCeil(NfcwX, NevYl ; 

da - ‘is 

GotoXY (0, 221; 

dy - 1; 

priatfT" . you have stepped m a bomb 11 •*******")? 

break; 

Pause () ; 

case *2 f : /* down arrow •/ 

GotoXY (0, 22); 

dx = 0; 

print fTszClear); 

dy • X; 

GotoXY^ (Q, 22); 

break ; 

1 else |. 

Case f 3': /* page down */ 

if ( [NettX “ G RID X-1J £i (NewY — GRID Y l)} | 

dx - 1; 

bAbort = TRITE; 

dy - If 

RoardjUaerXnUserY] =■ bVISITED; 

break; 

DispUyCslHUSerX, IfserY); 

case 27r 

Boa rd f NewX1 [ NewY t - bCURR ENT ; 

case 13: 

DispiayCei 11 NewX , NewY ); 

case 10: 

GbtoXY [0, 22); 

case &: 

prirttf (**•****•»***** you HAVE PfOKH ...it.i.i,..,*), 

bAbort - TRUE; 

PauseO ; 

break; 

GotoXY ID, 22); 

default; 

print* SsaClear); 

bDune * FALSE; 

GotoXY (D, 22] ; 

break; 

| else | 

| 

Board]UserX |[ UaerYj - bVISITEU; 

j 

Displaycell[UserX, UsetY] ; 

GotoJtYjO, 24); 

UserX - NewX; 

printftszCleat) ; 

UserY = NewY; 

if UhAbort! E 

Board[UserX)[UserYJ - bCURRENT; 

HeuX - UserX + dx; 

DisplayCellTUfierX, UaerYJ ; 

NewY = UserY + dy; 

1 

if 1 TNewX < D\ . {New* >= GRID X) J. (NewY < 0) !: (NewY >- GRID Y) f { 

\ 

GotoXY (0, 24); 

| 

printf7"ERR0R: Gut of bounds 

GotoXY^[0, GRID_Y*2+2 ); 

Paused; 

printf 7" Number of mines around you; Id*, CountHines(UserX, UserY]); 

GotoXY !Q* 24] ; 

GotoXY (0, SCREEN Y - 1) ; 

printf(SiUlear); 

return^[bAbort ); 

1 else [ 

i 

GotoXY ID, 24]; 

void PlaceUserHark[vgid] 

if (UcerMarklNewXl[MewY] 1-0) 1 


Ch - 0; 

BOGL bUqne,, bAbort; 

1 else | 


11 n 
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Ch = 'H'; 

I 

UserMaTktNewX] [Ifertl = Chi 
DUplayGel 1 {NtowX, NewY>; 

I 

I 

GgtoXY (0, 24); 

) 

void Computed ]acenc!Hint x, int y> 

i 

int cLKh dY; 
int BombCiiunt; 
int Cell; 

if ((n >- 0) £6 lit < GRID_X) if, (y >= 0) fit (y < EHID_Y} J I 
if ( \ Board{x|ly ] = bvrSlTEDt !! (Board[xj[y] *■ bGTJRREHTJ \ \ 

BornbCount - Count Mi nee (Jt, y) r 
Cell = 0; 

tor idX=-l; dX<=l; dX+ + ) | 
for (dY—1; dY<-l; dY++) I 
i£ (!<{dx == 01 it (dY — Oil> 1 

if (U+dX >= Q) fit (x+dX < GRID X) tfi 
(y+dY >- Oi fit (y+dY < GRIDJf)) ( 
it ((Boa*d[x+dXj[y+dY] != bVISITEDi u 
(Board[x+dX][y+dY] 1= bCDRRENT]) 1 
it it)serMark|K+dX] [y+dY] !“ 0) i 

BombCount—; 

\ else ( 

AdiJcencyGionp[x][yj.Cell[Celll fO) - x+dX; 

AdjacencyGroup[xJ jyj + Cell[CellM1| = y+dY; 

Ceil++; 

J 

1 

I 

I 

I 

1 

AdjacencyGrouptxl [y ] .BornbCount - BombCouritf 
AdjacencyGroup[x][y] h CellCount = Cell; 

\ else | 

AdjacencyGrouplx] [y] h CellCouiiit = 0; 

AdjacencyGroup[x] fyj ^BornbCount * -lj /** Don't look flag */ 

( 

I 

itlt AddTo.PQ 3 ition.Liat | int Fob it ion Lie t |GRID_X * GRIDJTJ[2| P 
int RositionListHead, int x, int y) 

( 

int nTndex? 

BO0L bFound; 

ComputeAdjacency(x, y\ ; 
bFonnd = FALSE; 

for (nIndex-0; fnTndex<Poevtir3nLiStHeadl *fi (IbFmind); nindox+*) | 

if ((Posit Ion Hat[nlndexj[□] — xi fit (PoaitionLiattnlndex)[1] “y)J [ 
bFound - TRUE; 

) 

1 

if (IbFound) \ 

PositiofLLiat [PositlonLiatHead] [Oj - x; 

PositionLiat[PositionListHesd]til = y; 

Posit ionLiBtUead++; 

\ 

if (Posit i enlist Head >, QftiE X * GRIDJf) I 
GOtOXY (0, 22); 

printfl"ERROR! FosititmListHead > max ltd}", PositioniistHead); 

Pause (J } 

GotoXYjO, 2Z); 
printfTsaCl&ar); 

GotflXY (jO* 22); 

) 

ret u tn (Fos 1 1 ionLis tHead); 

) 

int AddSurEDnndingToPGsitionList(int PositionLiaUGRID_X * GRTD_Y|[2 ] h 
int PositionListReadii int x, int y) 

I 

int dX, dY; 

for (dx=-l; dX<=l; dX++) { 
for (dY—1; dY<-lf dY++) I 

if Ux+dX >= 0] fifi (x+dX < GRID X) fifi (y+dY >- 01 tt (y+dY < GRID YH \ 
if ((Board [x+dXH y+dY] « bViSlTEDl :! 

(Board [31 tdXHy+dK] == bCURRBWn) i 

PoeitionLietHead = Addr-oPositionLiat (PositionList, PositlonLiatHead H 
x+dX, y+dY); 

] 

1 

J 

\ 

return [FositionLiatHeadl; 

t 

BOOL FindP03itionlnAG]ADJACENCYGROUP *pAG, int x, int yf 
( 

int nlndex; 

BOOL bFOund; 
bFomnd = FALSE; 

for inrndex=0; nlndex<pAG->CellCount; nlndex+t] ( 

if HpAG->Cell[nIndexJ [0] “ xl (pAG->Cell[nlndexj[1J == y)1 ( 
bFound = TRUE; 

\ 

1 

return (bFound)f 

I 

void HariBombCellCicit x, int yl 

USerHark[x][y] = r M '} 

DispiayCell(x H y) f 
if (Board|x}[y] != bBOMB) | 

GotoXY_£0, 22); 

printf ("LOGIC ERROR; I tagged a phantom bomb @ x t y); 

Pause (); 

(continued on page 112} 


The opportunity 
of a lifetime might be 
looking for you. 


That's right—the career opportunity you've always 
dreamed about might be out there looking for you at 
this very moment. Or maybe a month from now—or a 
year from now. But how will it ever find you? 

The Professional Registry of The Marlton Career 
Connection, Ltd. is electronically scanned by large and 
small corporations, government agencies and other 
institutions requiring professionals at all levels—from 
senior management positions to programmers—for per¬ 
manent jobs to consulting assignments. And YOUR 
IDENTITY IS KNOWN ONLY TO US. Subscribers 
request contact with you through The Professional 
Registry, which provides contact information ONLY 
WITH YOUR PERMISSION. 


There are two ways to register. You can use your com 
puter to dial up ours and be guided in entering your 
credentials. Dial (301) 816-9210*, Alternatively, ask for 
a registration form to be mailed to you by calling (301) 


816-9651, PLEASE, No Resumes. 

Registration is FREE—SO ACT NOW! You have 
everything to gain. , 

Marlton 

Career 


‘ft bits, no parity, one stop bit, 
300/1200/2400 baud 


Connection 
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Uncompromising 

No Surveys. 

No Interviews. 

No Jokes. 

(well, sometimes...) 
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Simply the best tool for C programmers. 


Period. 


YES — ! want the best C information Nowl 

□ 1 year (S28) — Save 49% off our newsstand rale! 

Q 2 years fS52) □ Bill me 

Q 3 years ($75) □ Payment Enclosed 
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_ 
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EXAMINING ROOM 


Listing One (Listing continued, text begins on page 72 J 

GotoXY_(Q, 22}; 
print!(szCLear); 

GotoXYjO, 2A\; 

\ 

\ 

void VisitCeii(int x f lot y) 

E 

if (BoardElf] [yj ! = bCURRENT} 1 
if (Board[xlJyj “ b&OMB) | 

GotoXYjO, 22); 

printf(“LOGIC ERRORi I walked on a bomb G (*d,!d],“, x, y}; 

Pause () i 
GotoXY_[0, 22); 
printf(azClear); 

GotoXY (0, 24); 

I 

Board [aHy] - bVISITEO; 

DisplsyCellS» H y); 

\ 

) 

iat CountCoiHnonCelis [AOJPlCENCYGHOUP "pGraupi, ADJACENCYGROUF *pCroup2) 

I 

int Cell, nCouut; 
ftCount - 0; 

for (Oil=6; Cell<pGraupI->CellCDunt; Ceil++) I 
if (FindPo3itionInAG[pGroup2, 

pGroupl^CeUjCeU] |0>] , pGroupl->Cell [Cell] 11]) 1 I 

nCountt*? 

) 

1 

return (nCount); 

1 

BOOL FraeessRule3(ADJACENCYGROUP *pCurrentAG, ADJACENCYGROUP 'pTempAG, 
int PositionLiat[GRIDJt * GRICMMl?], 
int * pPos 1 1ionics tHead) 

I 

int x: 

int BombCount, CellCount; 
int PositionListftead; 
int CeliHolderOI [2]; 
int CftllWolderHead: 

&OOL bEtetVal; 

positionListHead ** ‘pPasitionluatflead; 
tiRetVal - FALSE; 

BombCount = pCurrentAG'^BombCourvt; 

CellCount - pCurreotAG->CeilCdunt; 

if (pTempAG->CellCount -- CountCcmm-onCens [pTempAG, pCurrentAG] ) \ 
RambCount —• pTenipAG- >BCnnbCount t 
CellCount -= preiitpAiG->CallCount; 

if f (CeilCount > b) 46 £ (RambCount == CeUCountl :: (BombCaunt OMJ I 
bRetVal - TRUE; 

CeliHolderHead - (1; 

CellCount = pCurrentAG-HrellCount; 
for (?£=0; xcCellCount; x++1 ( 

if ((FindPositionlnAGIpTempAG, pCurrentA£->Cell Jxj [C], 
pCurEentAG->Cell[x)[I])} j 
it (RambCount ” □) | 

Visit >11 (pCtrt*entAG->Cell (xl {01, pCurrenLAG->Ceinx] !l \ 1 ; 

J else l 

MarkBombOell (pCurrentAG->Cell txi [A], pCurrentAG‘>Ce!l(x! IIJ) ; 

I 

/* (judue up cells to put in position list for later v 
CeiiHolderICeilHolderHead][0| - pCurrentAG->Cell|x][0J; 

Ce11HOIder\CeIlHoIde rHead][ 11 = pCu c re nt AG->Ce11 [x] [II; 

Ce11 HolderHead+^; 

\ 

\ 

tot (x^O; x<CellHolderHead; x++> I 

PositionLiStHead ■= AddSurroundingTbRasitionList £ 

PositlonList, 

Po gitlOnLis t Be ad j 
CellHolderI k]101, 

CellHoLdar[xl[lj); 

1 

1 

J: 

*pPasitionListHead - FositionLiabHead: 
return (bRetYal); 

\ 

void Eva 1uat ePasition (void! 
t 

int CurrentX* CurrentY; 
int x, y; 
int Cell; 
int dX, d¥; 

int BombCount, Cel iCount; 

int PositionList[GS1D_X * GRID_Y|[2], PositicrnLiacHead; 

ACJAtEKCfGROUP ■pTempAG; 

BOOL bOane; 

BOOL bModifiedAtiy; 
bModiiiedAny - TRUE; 
for (x-0; x<GRIP_X; x++) [ 
for (y=0; y<GR!D_Y; y*+] I 
ComcruteAd]acency)x, y] ; 

I 

i 

PoaitionList 10HD I = UserX; 

PositionListlO][1] - UserY; 

PositionListHead = 1; 
while IbModifiedAny) I 
fcM&drf iedAity =■ FALSE; 
while (PoaitionListHead > 0) ( 

CurrentX = PnsitionLiatJ0|[0]; 

CurrentY = PositionList[0j[1]; 

for [x-0; xrPositionLi^tHead-l; xt+) I 

PositiOrtList[x][0] - PositionLiflt[X+l]f0)! 

PoaitionList[xj[1] = PositionList[x+lj111; 

) 


Posit iuL i s tRead—; 

Compu t eAd -} a cen cy (Cu r rentx, Cu r ren L Y j; 

BombCpunt = Ad j seen c/G roup S Current X' | Cur rent Y; + Bo®bCotint; 

CellCount - AdjacencyGcxnipjCurrentX|[CurrentY].CellCountf 
if ( (CellCount > 0} 6i (BosnbCount > -11) f 

/' 

Rule 1: if number of bombs = number of cells* all a-o bombs I 

»/ 

if (CeUCeunt == HounbCount 1 1 

for [Cell-0; CeLKCeiiCount; Ceil + t) I 

x = AdjaceneyGrouptCurrentX] ’CurrentYj .Cell [Call]i [D); 
y - AdjacencyGroup[cutrentxj(CurrentY].Cell[Cell)[lj, 

MarrBojkbCeli (x r y) ; 

PoaitionListHsad = AddSuEimmdingToPos?tlonLiat )PositionList, 

PoaitionLiatHead* 

x, y); 

bHodifiedAny = TRUE; 

1 

1 else E 

J* 

Rale 2: if number of bombs - 0, ail cells are o5t! 

*/ 

If ((Honbcount ==0) 16 [CellCount >0)1 I 
for (Cell-0; Cel KCe 11 Count; Ceil+*1 I 
y. = Ad^acMcyCroupJ Cur rents j [CurrontYj + Cell [Cell] ID]; 
y - AdjacencyGroupiCurrentX][CutrenfY T Ce;lEcelll|1|; 

VisitCell(x F yl; 

Pos3rionListHead = AddToPositionLlat(PoaitaonList^ 

PositionListHead, 

Yl? 

PositionListHead - AddSur round i riaToFos 1 1 i on List (Posit ion La St j 

PosationListKead, 

x+ yl; 

bbtod if iedAny - TRUE; 

1 

1 el3e I. 

/* 

Rule 3; if AG completely overlaps another AG,, subtract 2nd 

t of bomba from 1st; check rules 1^2. If rule 1 or 
2 is true in thi# case, stop looking in rule 3. 

hDone = FALSE; 

for (Cel 1-0; (CelKCellCount] it (Ib&one); Cell+^[ ' 

X = Ad^aceiicyGrtuipICurrentX] [CurrentY]-CellECeIl| jOl; 
y - AdjacencyGroup[Current^][CurrentY].CellIGelli [lj; 
for idx=-l; (dX<-i) (i Cbbone); dX+M 1 
for fd¥—lj (dY<=lE 46 (JbDone); dY+*) 1 
i( ((x-KiX >= 0) 44 [K+-dX < GRID_X) i6 
)y4-dY >- 0) 46 lyHdY < GRIDJU i 
pTemF AG - S-Ad j ace ri c.:yG coup [ x +dX ] [ y+dY I; 

if (pTempAG->BotnbCount > 6) I /* if == C, no help! */ 

bDone - REoeessRuleS (iAdjA^encyGroupfCijrrejitxncurrentYl.* 
pTempAG, 

PositionList, 

6 Pd&tt ionList Bead); 

if (bcone) [ 
bWodifiedAny - TRUE; 

! 

\ 

> 


I 

J 

1 

1 

3 

if (bHodifiedAny) I 

for (k=0; m<GRID X; x++) r 
for (y-D; y<GPI[J_Y; y++) ! 

ii ((Board[x] fyl — bVISITED] [Boardhl [y] == bcuRREHT) i i 

Poait ionList Head = AddToPoaiLiuriLiat I Poalt ionList, 

Foa 1 1ionList He a d, 

x, y); 

] 

1 

i 

] 

1 


BCOL LetlfserMove (void) 

[ 

BOOL bbone; 

BOOL bQuit; 
int Ch; 
bDor.e - FALSE; 
while (Ibbioue) [ 

Ch - getch<); 
switch (Ch) ( 
case Ch 


Ch - getchf); 
switch (Cb) ( 

case Yl; /* home *2 
bLtone - Travel(-1, -U; 


b rea k ; 
case 72: 
boons = 
break.; 
case 71* 
bOcme = 
break; 
case 7S: 
bbone = 
break; 
case 77; 
b&one - 
break; 
case 79; 
bbone - 
break; 
case 8&: 


/* up arrow */ 
Travel(0, -1); 

/* page up */ 
TraveKl, -1) f 

/" left arrow */ 
Travel (-1* (J) ; 

/* right arrow •f 
Travel U, 01; 

/* end */ 

Travel(-1* 1); 

/* down arrow */ 
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bOcme = Travel(0* 1); 
break; 

case -Blr /* page down */ 
bDone - Travel(1* 1); 
break; 

I 

break; 

case '7 H : /* Roro* */ 

bDone - Travel]-1, -1); 
break; 

case J 8'; l* up arrow */ 
bpone = Travel]0 r 
break; 

ease '9 H r /■* page up */ 
bDone = Travel(1, -t); 
break; 

Case '4 H : /* left arrow */ 

bDone - Travel]-1, 0] ; 
break; 

case J 6': /* right arrow */ 

bDone = Traveler Q); 
break; 

case '1'i /* end */ 
bDone ’ Travel(-1, I] ; 
break; 

ease *V: /* down arrow V 

bDone = Travel(0, If; 
break; 

case '3'; /* page down */ 

bDone = Travel(1, U ; 
break t 
case 'Q f t 
case r q J : 
case 27: 

bDone - TRUE; 
break; 

case 1 W 3 
case r m ': 

PUcelfserNarkn ; 
break; 
case *?*: 

EvaluatePositlojij li; 
break; 

} 

I 

bShowBorabs - TRUE; 

PaintBoard]J; 

GctoXYJOj SCREENJf - 1); 
printfT H Again (T/ril? 
bDone - FALSE; 
while [!bDone] t 
Cb * getchO ; 

if HCh = 'Y'J :: (Ch « V) I! {Ch “13] (Ch = ion I 
bDone - TRUE? 
bOuit - FALSE; 

printf ryWn 

} 

if j(Ch = -n n :: ]Ch « r h r n ( 
bDone ■ TRUE; 
bQuit = TRUE; 
printf r'N\nn ; 

I 

if (Ch — NOW.) I 
getchi \: 

I 

1 

return (bQuitb 
f 

int unainiint argc, chat *argv[n 
[ 

BOOL bD-one; 

Initial! seil) ; 

If Usrgc > 1) 

(argVliH.0] ==’/') t* 

(]argv[mU “ ’ $'} (i (argvllHl] = * S' H ] I 

bSefeDane = TRUE; 

printf ["SAFE GAME in effect AO; 

) else | 

bSafeGame - FALSE; 

I 

bDone - FALSE r 
while ([bDone] < 

SetUpBoaxd][; 

bDone - LetUserMoveO ; 

] 

return [0]; 


End listing 


"BrainMaker is 
the most fasci¬ 
nating computer 
software I've 
ever seen. This is 
hotter than hot." 
John Dvorak 
PC Magazine 


New! BrainMaker 
V2.0. 

The #1 selling Neural Network. 
Over 7,000 copies sold. Here's why: 

Best documentation: 255 pg Introduction to 
Neural Networks.* 332 pg Users Guide, 80 pg Application 
Guide. Gar documentation includes everything you need 
to know to build networks and applications now. 

Easiest to use: Pull down menus and dialog boxes. 
Supports mouse, color. NetMaker automatic network 
generation program helps you build networks in seconds. 

Fastest: 

128,000 cps on 286/8; 

250,000 cps on 286/20; 

500,000 cps on 386/33; 

3 Million cps on €25; 

4 Billion cps on N64, 

Most complete product line: 

* BrainMaker is $195, including all three books and 
NetMaker, our automated network generation program. 

* BrainMaker graphics post-processor is $79.95. 

* Hypersonic Training is $149.95. Our proprietary 
algorithm trains networks in minutes instead of hours. 

* BrainMaker Professional is $795. Reads Dbase, Lotus, 
Excel, and Quattro files; includes graphics, binary files, 
hypersonic training, very large networks, and much more. 

* BrainMaker C25 Accelerator from $2500. 3 million cps, 

* Support for the Intel N64 neural network chip. You can 
build and train networks for this important new chip now! 

Call or write for a Free Catalog! 
California Scientific Software 

160 E Montecito #E, Sierra Madre. CA 91024 

(818)355-1094 

"I recommend BrainMaker without 
reservation." Steve Gibson, Infoworld 
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PROGRAMMER'S WORKBENCH 


Listing One (Text begins on page 77 . > 

/* ease.c “ edge enhancement system in C */ 
(include <3tdi0*h> 

(define ASize (x) taiieof fx)/sizenf (x[Q])) 


/* length of array */ 


/* PrintGraphO - 
FILE 4 PFDiitFp 


print out graph of an array of numbers*/ 
= Istdoutl; 


int FrintGraphl PFarray* ILen, 

Iny 

S 

float 

•PFarray; 

/* 

pointer to floating pioftt array */ 

int 

ILen; 

f* 

length of the array */ 

int 

1 

Iny; 

f* 

i of points along the y-axjs *1 

float 

FMin, FMax; 

l* 

minimum and maximum values */ 

float 

FSc, FOff; 

t* 

scale & offset */ 

int 

Iwx; 

/* 

work index l / 

int 

LUj 

/• 

Line index */ 

int 

ITx; 

i* 

temp index */ 

Lnt 

IpTx; 

/* 

prior line index */ 

int 

leh; 

/* 

character to display */ 


11 reasonable" — */ 
01! Iny o I ) 


*/ 


/■* -check that all parameters are 

if ( FFarray “ (float *}Q !: ILen 
return[ -1 J; 

f* compute minimum end Tnaxiimim values for array 
FMin - PFarray[0]; 

FMhx = FFarray[0]; 

fort Iwx - If lux < ILen; Iwx++ l ( 

if ( FMin > PFarray [lw.x] ) rain = PFarray [Iwx]; 

if { PFarray[Iwx] > FKax ) FMax - PFarray[I wk]; 

i 

if ( FMirt > 0.0 ) FMin = 0.0; 

f* from minimum and maximum, compute scale and offset - 

if ( fFMSX - FHinl < >0001 j ! 

assume that all values are the same */ 

KOf 


/• _ 
FSc 
FOff 
| else £ 
FSC 


-FHinf 
! Iny / 


(FHax - FMin); 

FOff - -FSc * FMin; 

IpTx - Of 

fputc £ '\n J , PFOutFp )j 

for( Ilx = Iny; Tlx > e Of Ilx’-"- [ ( 

fort Iwx = 0; Iwx < ILen; lwx++ ] t 
ITft = FSc * PFAcray [Iwjc] + FOff; 
if ( ITk < 0 ] ITx - 0; 

if j ITx > Iny 1 m - Iny; 

if ( Iwx = 0 ) IpTx - ITx; 
if ( (IpTx < Ca (i I la: < ITx) f! 

(ITS < Ilx it lix < ipTxJ ►: 

(ITS — Ilk) ( let - r x f ; 

else leh = * *f 

fputc( leh, PFOutFp ); 

TpTx - ITx; 

* 

fputc ( ' W, FFOatFp ); 
return( 0 )? 

/‘ Convolvef \ - Convolve a filter with a ane-dimensional signal 
mt Convolve [ PFllter, IFLen, PFInVec, PFResVec* ILen ) 


float 

int 

float 

float 

int 

t 


"PFilter; 

IFLen; 

‘PFInVec; 

‘PFResVec; 

ILen; 

IF*; 

IResX; 
IResXLast; 
TResXFirst; 
DRv; 


pamter to filter coefficients */ 

number of coefficient a in filter */ 

input signal vector */ 

output result vector */ 

length of input i result vectors V 

filter index */ 

result index •/ 

index of last result item V 

index of first result item *( 

result value *t 

/ 


(float *}0 1 return! 
>/ 


int 
int 
int 
int 

double 

/* - check for things which do not make sense 

if ( IFLen <■ □ '3 ILen <■ IFLen ) return( -1 ); 
if £ miter == (float *)0 :: 

PFInVec — (float *)0 !! PFResVec == 

/* ““ convolve the filter with the signal - 
IResXFirat * IFLen / 2; 
rftesXLast = ILen - (IFLen -1J /2 ■ 

fori lEtesX - IResXF list* IResX < iResXLast; IKesX*+ | 1 
DRv = 0.0; 

fori IF* “ 0; IFx < IFLen; 1F*+* ] 

DEtv += PFllter [IFx | 4 PFInVec [ TResX-IResXFiratMFxT; 
PFResVec|IResH| * DRv; 

I 

/* — handle left edge specially — V 
Wv = PFResVec [ IResXF i rst f; 

for £ IRosX = 0; iReiX < iResXFirst; IResX+^ ) PFResVec I IResJfJ ^ 
/* — likewise right edge — */ 

DRv = PFfUsiVec [ FResXLast -1J; 

fort IResX - IResXLast; rfiesX < ILen; lHesS£++ ) RFResV&ctJResJt] 
/* —‘ we ure defne — k / 
return £ 0 ); 


1 I? 


MNCyclel) - perform one iteration with Neural Network */ 
int NNCyclej Bias, PFllter, IFLen r PFInVec, PFResVec, ILen ) 
bias for PE */ 

pointer to filter coefficients * 
number of coefficients in filter •/ 
input signal vector 1 / 
output result vector */ 
length of input £ result vectors */ 

filter index */ 
result index */ 
index of Last result item *i 
index of first resuLt item */ 
result value */ 
lo not make sense —- */ 

Mi ) return( -X |; 


float 

Bias; 

/* 

float 

*PFilter; 

/* 

int 

IFLen; 

/* 

float 

*PFlnVec; 

/* 

float 

•PFResVec; 

/* 

int 

iLeo; 

/* 

int 

IFx: 

f* 

int 

IResX; 

/' 

int 

IResXLast; 

f* 

int 

IResXFlrit; 

i* 

double 

DRv; 

/* 

/* — check for things which i 

if I IFLen 

<-01! ILen i= 

IFLi 


-1 \i 


it ( pFilter = [float *)Q !! 

PFlnVec “ (float *JQ t! PFResVec *• (float *]Q ) return( 
f* — convolve the filter with the signal -— */ 

IResXFirst ” IFLen / 2; 

I&esXLast - ILen - [IFLen-l)/2; 

fori IResX = IResXFirst; THesX < IResXLast; IResX+* ) ( 

DRv * -Bias; /* NN special */ 

fort iFx = 0; IF* s IFLen; TFx-t-+ ) 

DRv +- PFilter[IFxJ * PFlnVecfIResX-IResXFirst+IFx]; 

ft „— apply clamped linear transfer function to output - */ 

if ( DRv < B.O ) DRv - 0.0; /* NN special */ 

else if ( DRv > l.Q ) DRv =1,0; /* NEJ special */ 

PFResVecIIResX] * DRv; 

) 

/• -— handle left edge specially — */ 

□Rv = PFResVec[IResXFirst]; 

for( IResX = 0; IResX c IResJCFirst; IResX++ ( PFResVec £IResX] - DRv; 

/* — likewise right edge *— */ 

DRV = FFHsSVecIIReSXLast-l]; 

for( IResX - IResX Last; IResX < ILen; IResXM [ PFResVec JI ReaX] - DRv; 

/*-wh ace done- */ 

returnt 0 ); 


malnO - main driver 
Input signal 


float F£ignal[] * l 


routine 


0.20, 

0.20, 

0*20* 

0.20, 

0*20, 

0.2 0 * 

0*20, 

0.20, 

0*20* 

0*20 ( 

0.20, 

0.204 

0.20* 

0.20, 

0*20, 

0,20* 

0.20, 

0.20, 

0.20, 

0.20, 

0.20, 

0.20* 

0.20* 

0.20* 

0.20, 

0.20* 

O.20* 

0*15, 

0.20* 

0.25, 

0.30, 

0.35* 

0,40* 

0.45, 

0*50, 

0*55, 

0.60, 

0.65, 

0.70, 

0.75, 

O.80> 

0.80* 

0.80 f 

0.80, 

0*80, 

Q . BQ r 

0,83, 

0.80, 

0.70, 

0.9D, 

0,80, 

0.80, 

0*60* 

0*90, 

0*40, 

0*604 

0.30, 

0.10, 

0,20, 

0.20, 

0.20, 

0.20* 

0.20, 

0.20, 

0.20, 

0.20* 

0,20, 

0.20, 

0.20, 

0.20, 

0.20, 

0.20, 

0.20, 

0.20* 

0.20, 

0.20* 

O.20, 

0.2O, 

0.20* 

0.20, 

0.20, 

0.20* 

0*20, 

0*20, 

0*20* 

0,204 

Q.20* 

0.20, 

0.20, 

0.20, 

0.20* 

0.20* 

0,20* 

o*i0. 

0.25* 

0,30, 

0.10, 

Q.20. 

0.20, 

0.20, 

0.20, 

0.20* 0,20, 

Result Signal 

0*20, 

- */ 

0*20. 

0.20* 

0*20, 

0*20, 

0,20 | 

If 


-0.3H, *0,60, -0.10 \; 


float FReaultl l ASize LFSignaM J - (0|; 
float FResult2 [ ASire LFSignaU ] - (0); 

/* - Convolver for Neural Metwork - */ 

float FMHFU - ( 

-Q.10, -0.6Q, -0.30 f 0.50, 1.10, 0.50, 

ft - Standard (sobel) edge detector - ■ 

float FSobelN - ( -1.0, 0*0, 1.0 )f 

icaint) 

int Iw*; 

float *PFResA, 'PFResB, *PF£wap; 

PrintGraph( 4PSignal|0J r ftSire(FSjgnal), 40 ); 

£put&( "\n- Original Signal —\n\n", PFOutFp ]? 

Convolve! iFSobel[Q[ f ASiie(FSobel), 

JEFSignaiLO], tFResult 1 [01 - ASire (FSignaj) ); 

PrrntGiachl SfResultl[R], ASire[FResultl). 40 >; 

fputs( "in- Result at applying scbel edge detector to image-Nn^n^i 

PFOutFp i ; 

PrintGraph( SFSigral[0], ASiie(FSignal), 4i i f ; 
fputs( "'in—^ Original Signal '--XnVn", PFOutFp ); 

PFResA = iFSignal[D]; 

PFResB - tFResult1|0); 

PFSwap - tFResult2[0]; 

fori = If iw* <= 0; I»k*+ ) ( 

HfN Cycle ( .02, tFHKF ]0i , ASire (FMMFE, PFResA, PFResD, AS ize (FSignal] J; 
FrintLraphl PFHesR, ASizelFResultlf, 40 Jj 
fprintf ( PFOutFp, "in*— Cycle number id '—\n\n% Iwx ]; 


PFResA = PFResB; 
PFResB - PFSwap; 
PFSwap = FFReSA; 


/* swap result pointers */ 
/* nest ResB */ 


ei£it( 0 }; 


End Listing One 
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Neural Network Rased "Edge Enhancein*fnt System* 
Written by: Casimir C< "Casey" (arenasauskas 
January 6, IS&O 

Lotus 1*2*3 version 3.0 spreadsheet 




0.02O 
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Raw 
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MHF 

Input 
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Filter 

Filter 

Data 


Iteration 
Graph A 


0.20 

0.20 

0.20 

0.20 


0.00 0,00 O + 0D 0.EE0 O.O0 0.00 0,00 0.D0 

O. 0 O 0 .O 0 Q .00 0.00 0.00 0.00 0.00 0.00 
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OFTWARE DEVELOPERS: 
ARE YOUR PRODUCTS 
OO HARD TO INSTALL? 

you are still using ye 0(de I9ffiiyLLLSBS¥T yUe to install your product, there is a much 
tetter way. Let's face it, the computer industry is maturing. What was entirely 
Adequate a few years ago is unacceptable today. If you have been requiring your 
fnd-users to use batch files, COPY, DISKCOPY, or RESTORE to install your distribution disks, 
jou are making an unfavorable first impression with them. Not only are these methods 
primitive, they have virtually no resilience to errors, and they rarely look professional. 

lere is an alternative.,. 

'JSTALL 3.0 will not only elegantly conquer your installation problems, it can also greatly 
icrease your end-user's confidence in your product by automatically checking the 
itegrity of the distribution disk(s). 

JSTALL includes a 100% reliable CONFIG.SYS and AUTOEXEC.BAT file editor which can 
|isk for permission before creating/editing existing files, and always creates backup files. 

Multiple source and target disks, multiple target subdirectories (which INSTALL will create if necessary). 
Intelligently handles all DOS errors including open disk drive doors, unformatted and full disks, write protected disks, 
network violation errors, bad disk sectors, insufficient memory, etc. 

Forget long sections of text in your documentation covering installation procedures. Instead, the installation section 
can now simply say TYPE A;IN3TALL f ‘ and INSTALL handles the rest. 

You can allow your end-users to only install parts of your product such as various device drivers. 

Fast, full-screen, text oriented windows interface. 

Quick, clean method of adding-in new features. 

High performance data compression will typically cut your number of distribution disks in half. 

Utilizes all available RAM for lightning-fast file transfers. 

INSTALL can create a single self-extracting (.EXE) file containing all of your distributions files. 

Installation logic may be based on the monitor (B&W/MONO/CGA/EGA/VGA), CPU (8086/268/386), DOS version, 
ANSI.SYS, NetBIOS, LIM, 80x87, LPT/COM port presence, disk capacity, disk free space, etc. to allow you to install 
a highly machine-specific product without burdening the end-user with questions s/he may not understand. 

Files up to 4.3 Gigabytes in size may be distributed by splitting the file across multiple distribution disks. 

No royalties. Unlimited free technical support. No programming needed! 

icludes C source code, make, project, and link files. 30-day money-back guarantee. 

4STALL offers 4 years of proven reliability that has been used by thousands of 
developers in 23 countries to install millions of copies of software including some of the 
lost prestigious products in the industry. We would like to add your name to that list. 

Dali or FAX before 4:00 today and receive your order tomorrow ! $249,95 + Shipping 






[NOWLEDGE DYNAMICS CORPORATION 

pighway Contract 4 Box 185-H, Canyon Lake, Texas 78133 
lasterCard/VISA/COD/POs Welcome 


1-800-331-2783 (Sales) 
1-512-964-3994 (International) 
1-512-964-3958 (24-hr FAX) 
1-512-964-3929 (24-hr BBS) 










SLATE S 


Would support for over 
400 printers give you a 
competitive edge? 

By including SLATE, you can 
provide immediate support 
for over 400 printers. SLATE 
comes with its own screen 
based configuration system 
so you don’t need to worry 
about end user setup. 

You can use SLATE in your 
product with no royalties. 

Make your product more 
functional and competitive by 

taking advantage of SLATE’s 
advanced features: 

* Support multiple printers on the same 

system. 

* Output to parallel printers, serial 

printers, DOS files, console, DOS 
print spooler, and Novell network 
printers. 

* Include laser printer soft fonts. 

* Support proportional fonts. 

* Set exact print positions. 

* Color printing. 

* Kerning, leading, overstrike, 

underlining, and strike through. 

You can use advanced features 
of modern printers while 
working smoothly with printers 
without those features. 


What is SLATE? 

SLATE is a set of C libraries 
with over 150 text printing 
functions, a Database of over 
400 printers, and tools for end 
user configuration and testing. 

Support over 400 printers for 
less cost than developing one 
more driver. Call now to order 
SLATE for only $299 with our 
risk free, 30 day return policy. 

We accept Visa, Mastercard, COD’s or 
PO’s from qualified companies. Source 
code, maintenance, and site licenses 
are available. Also ask for information 
about our S_PRINTText Formatting 
System for Software Developers. 


800 - 346-3938 

The p0 B °* 26195 

Columbus, OH 43226 

U ill It'll y 61 443-1.2667 

LirOlip RAX 614-431-5734 
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Listing Two (Listing continued, text begins on page 77J 
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0.00 0.00 - 0,30 
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0.00 0.00 - 0,10 
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0.00 
0.00 
0.00 
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0.00 
0.00 
0.00 
0.00 
- 0.05 
0.00 
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0.10 
0.10 
0.10 
0.10 
0.10 
0.10 
0.10 
0.10 
0.10 
0,10 
0.10 
0,05 
0.00 
0.00 
0,00 
0.00 
0,03 
0,00 
- 0,13 
0.10 
0.10 
- 0,10 
- 0.20 
0,10 
- 0,20 
- 0.30 
- 0.10 
- 0,50 
- 0,10 
0.10 
0.00 
0.00 
0,00 
0.00 
0.00 
0.00 
0.00 
0.00 
0.00 
0.00 
0.00 
0,00 
0.00 
0.00 
0.00 
0.00 
0.00 
0.00 
0.00 
0,00 
0.00 
0,00 
0.00 
o.oo 
0.00 
0.00 
0.00 
O.oo 
0,00 
0.00 
0,00 
0.00 
o.oo 

- 0 . ID 
0.05 
0.20 
- 0.15 
- 0,10 
0.10 
0,00 
0.00 
O.oo 
0.00 
0.00 
0,00 
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0.00 

0.00 

0.00 

0.06 

0.20 

0,00 

0,00 

0.00 

0,08 

0.20 

0.00 

0.00 

0.00 

0 . 00 

0,20 

0,00 

0.00 

0.00 

0.00 

0.20 

0.00 

o.oo 

0.00 

0.00 

0,20 

0.00 

0.00 

0.00 

0.08 

0.20 

0,00 

0,00 

0,00 

0,08 

0.20 

0.00 

0.00 

0.00 

0.06 

0.20 

0,00 

0,00 

0,00 

0,08 

0.20 

0.00 

o.oo 

0.00 

0.06 

0.20 

0,00 

0,00 

0,00 

0.06 

0.20 

0.00 

0.00 

0.00 

0.00 

0.20 

0.00 

0,00 

0,00 

0.00 

0.20 

0.00 

0,00 

0,00 

0.00 

0.20 

0.00 

0.00 

o.ao 

0.06 

0,20 

0.00 

0,00 

0,00 

0,00 

0.20 

0,00 

0.00 

0.00 

0 + 06 

0.20 

0,00 

0,00 

0,00 

0,08 

0.20 

0.00 

0.00 

0.00 

0.06 

0.20 

0.01 

0,00 

0,00 

0.06 

0.20 

0.03 

0.02 

0.00 

0.06 

0.20 

0.01 

0+00 

0,00 

0.06 

0.20 

0,00 

0,00 

0,00 

0.00 

0.15 

0.00 

0.00 

0.00 

0.06 

0.20 

0,00 

0,00 

0,00 

0.06 

0.25 

0.00 

0.00 

0.00 

0.06 

0.30 

0.00 

0.00 

0.80 

0.06 

0.35 

0.01 

0.00 

o.oo 

0 + 00 

0.40 

0.02 

0.00 

0.00 

0.00 

0.45 

0.02 

0,00 

0,00 

o + oo 

0.50 

0.03 

0.00 

0,00 

0.00 

0,55 

0,03 

0,00 

0.00 

0.00 

0.50 

0,04 

0,00 

0,80 

0,00 

0.65 

0,05 

0.00 

0.00 

0.08 

0.70 

0,09 

0,00 

0,00 

o.oo 

0.75 

0.15 

0.12 

0.18 

0.20 

0.80 

0.17 

0.20 

0.31 

0.49 

0.80 

0.15 

0.12 

0.16 

0,26 

0.80 

0.10 

0.00 

0.00 

0.00 

o.ao 

0.05 

o.oo 

0,00 

0,00 

o.sn 

0.06 

0.00 

0.00 

0 . 0 D 

o + ao 

0.13 

0,06 

0,03 

0.00 

0.83 

0.06 

0.06 

0,06 

0,00 

0.80 

0.06 

0.00 

0.06 

0,00 

0,70 

0,01 

0,00 

0,06 

8,00 

0.90 

0.21 

0.08 

0.06 

8+01 

0,80 

0.10 

0,14 

o.oo 

6,08 

0.60 

0.22 

0.05 

0.06 

8.00 

0,60 

0.13 

0.05 

0.06 

o.oa 

0,90 

0+29 

0,27 

6.32 

0.50 

0,40 

0,26 

0.28 

0.38 

0.58 

0,60 

0.11 

0.04 

0.05 

0 + 13 

0,30 

0.06 

0.00 

0.06 

o.oo 

0.10 

0.06 

0.00 

0.00 

0.00 

0.20 

0.06 

0.00 

0.00 

0.08 

0.20 

0.00 

0.00 

0,00 

0.08 

0.20 

0.05 

0.04 

0.03 

0.02 

0,20 

0 , 0 ] 

0,02 

0,02 

0,02 

0.20 

0,00 

o,ao 

0,00 

0.08 

0.20 

0,00 

0.00 

0,00 

0.00 

0 . 20 

0.00 

0.00 

0.00 

0.00 

0,20 

0,00 

0,00 

0,00 

0,00 

0.20 

o.oo 

0,00 

0.00 

0.00 

0,20 

0,00 

0,00 

0,00 

0,00 

0.20 

0.00 

0,60 

0,60 

0.00 

0.20 

0.00 

0.60 

0.00 

0,00 

0,20 

6,00 

0,00 

8,00 

0 + 00 

0.20 

6.00 

0.00 

8.00 

0.00 

0+20 

0,00 

0 . Q 0 

0 + 00 

0+00 

0.20 

8.00 

0,00 

0,00 

0 + D 0 

0,20 

0,00 

8,00 

0 + 00 

n + 00 

0.20 

6,00 

6,06 

0,00 

Q ,60 

0+20 

0.00 

8.00 

8.00 

0 + 00 
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0.06 

6,06 

0.06 

6 + 60 
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0.00 

0.00 

0.00 

0.00 
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0.06 

0.00 

0.06 

0 + 00 
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0.00 

0.00 

0.00 

0.00 
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0.00 

0.00 
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0.00 
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0.00 
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0.00 
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0.06 
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0.00 
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0.00 

0.00 
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0.00 

o.oo 
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0.00 

0.00 

0.00 
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0.00 

0.00 

0.00 

0.08 
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C CODE FOR THE PC 

source code, of course 

Updated! MS-DOS File Compatibility Package (create, read £ write MS-DOS filesystems on non-MS-DOS computers) . . ... „ . * . $750 

CQ L Query System (SQL re trie va Ison B-trees plus windows)..$325 

Graphic 5.G (high-resolution, DISSPLA-style scientific plots in color & hardcopy) .... $325 

PC Qirscs (Aspen, Software, System V compatible, extensive documentation) . ..* *.. . $290 

C-Data Manager (object-oriented data management, persistent objects from runtime definitions, network and entity models).$250 

MEWEL (extensible window and event library by Magma Software; message-passing & object-oriented; SAA-compatiblq dialog editor) . . $250 

TbrfcoT^X (Release 2.0; HP, PS, dot drivers; CM fonts; LaTjOC; MetaFont)...$250 

db_Fde & db.Retrieve by Raima (B-tree and network database with SQL query and report writer; multi-user $475) ..$245 

Green leaf Communications Library (interrupt mode, modem control, XGN-XOFF; specify compiler) . . . , ..$225 

CDirect (multi-user hashed file manager; variable length fields, binary or ASCII data, alternate keys) ... $210 

SilverComm (complete asynchronous communications library) ....$210 

NEW! Wendin-DOS Plus (self-bootable, multitasking, multiuser MS-DOS replacement; includes XTC editor).. , . ..$180 

QuickGcometry Library (large collection of mathematics, graphics, display & DXF subroutines for CAD/CAM/CAE/CNC).$170 

CB'lbee (B+tree ISAM driver, multiple variable-length keys) $165 

'lbrboGcometry (library of routines for computational geometry, Version 3.0) . ..$160 

AT BIOS Kit (roll your own BIOS with this complete set of basic input/outpu I funct ions for ATs) .. $160 

WKS Library Version 2.01 (C program interface to Lotus I-2-3* dBase, Supercalc 4* Quatro, &. Clipper) . $155 

Q$m (industrial-strength U**x-hke operating system, many tools, cross-development from MS-DOS) $150 

Cephes Mathematical Library (over 100 high-quality, double-precision scientific functions)... $150 

ME Version 2.1 (programmer's editor with C-bke macro language by Magma Software; Version 1,31 still $75) , , , ..$140 

Vmem/C (virtual memory manager; I east-recently used pager; dynamic expansion of swap file).... ..$140 

Turbo G Graphics Library (all popular adapters, hidden line removal) ..$135 

Rogue Wave Vector & Matrix Classes (inc. C++ overloadings for standard operators, matrix inversion & FFT; Zortech or GNU C+ + ) . . $125 

Power Search by Blaise Computing (regular-expression compiler; generates machine code on the fly) , , ..$120 

Install 2.3 (automatic installation program; user-selected partial installation; CRC checking)...* ... $120 

TEEditor Developer's Kit (full screen editor, undo command, multiple windows) .$115 

NEW! Hold Everything (spawn new programs; swap parent to EMS or disk; handles video, in term pis, & environment; returns error level) . . . . . $105 

G-Strings (dynamicstring handling; cut, copy, paste, search, user input, etc.; non-fragmenting memory management).$105 

Minix Operating System (Version 1.3; U**x-Iike operating system, includes manual) ....$105 

PC/IF (CMU/MITTCP/IP for PCs; Ethernet, Appletalk & NETBIOS drivers, RVD, gateways). .5100 

R-Tee Library & ISAM Driver (file system utilities by Softfocus)... $100 

The Profiler (program execution profile tool) ... , , .. . $100 

QC88 C compiler (ASM output, small model, no longs, floats or bit fields, 80+ function library).$90 

Cheaper! Hooter Toolkit (floppy disk bootstrap routines, DOS file system, light-weight multitasking, windows, fast memory management) .$85 

Otter 1.0 (beautiful theorem-prover by Bill McCunc; includes manual & two books by Wos; complete starter kit).$80 

JATE Async Ibrminal Emulator (includes file transfer and menu subsystem)... $80 

NEW! PowerSTOR (extended heap space on extended memory, expanded memory, and/or hard disk).$80 

MulUDOS Plus (DOS-based multitasking, intertask messaging, semaphores)...$80 

NEW! ITY-PHEM-EX (a hyphens tor for American English with over 4,800 rules) ... $75 

Make (macros, all languages, built-in rules) .....$75 

cvalO (C function to evaluate ASCII infix expression siring; 17 built-in functions) ... * . , . $75 

XT BIOS Kil (roll your own BIOS with this complete set of basic input/output functions for XTs) ..$75 

Professional C Windows (lean & mean window and keyboard handier).. ... $70 

Heap Expander (virtual memory manager using expanded memory, extended memory, and disk space) ..$65 

Quincy (interactive C interpreter)...$60 

Symtab/^irce (general-purpose symbol table/parse tree construction and management package; specify Symtab or Ptree).$60 

Coder’s Prolog (Version 3.0; inference engine for use with C programs) ....,.. $60 

Async-Tbrmio (Unix V compatible serial interface for MS-DOS; stty, ioctl, SIGINT eto)..... , , $55 

Backup & Restore Utility by Blake McBride (multiple volumes, file compression & encryption)...$50 

Floppy TAR (TAR backup and restore on MS-DOS devices; direct access to non-standard devices) ...$50 

SuperGrep (exceptionally fast, revolutionary text searching algorithm; also searches sub-directories) ..$50 

OBJASM (oonvert .obj files to .asm files; output is MASM compatible) ... . .... ..... ... $50 

Multi-User BBS (chat, mail, menus, sysop displays; does not include Hayes modem driver) .... $50 

LaplaceB (LaPlace polynomials, real and complex)... $50 

CL A PS (rule-based expert system generator, Version 4.3; advanced manuals a vailable).$50 

NEW! PCHRT (40 functions to manage multiple microsecond timers; generate precion delays; insert timers on any interrupt) . ...... $45 

Kier DateLib (all kinds of dale manipulation; translation, validation, formatting, & arithmetic) ........... .. $45 

Eortran-io-C Translator by Polyglot (Fortran-IV-1 ike Fortran to ugly C; plan to adapt to your own flavor of Fortran) .. $40 

DES Encryption & Decryption (2500 bits/second on 4,77 MHz PC for on-the-fty encryption at 2400 baud) .. $40 

HexList (doubly-linked lists of arbitrary data with multiple access methods) ...$40 

Virtual Memory Manager by Blake McBride (LRU pager, dynamic swap file, image save/restore).$40 

Heap I/O (treat all or part of a disk file as heap storage).... $40 

Bison & BYACC (YACC workalike parser generators; documentation; no restrictions on use of BYACC output) ..$35 

PC-XINU (Comer's X1NU operating ^slem Cor PC) t ...... ................... . $35 

RXC & EGREP (Regular Expression Compiler anu Pattern Matching; RXC makes finite state machine from regular expression) , . , , . $35 

Cheaper! REGX Plus (search and replace string manipulation routines based on regular expressions) . ..$30 

CCALC (handy ex tended-precision calculator; real and complex models: many built-in functions) ..$30 

GNU Awk & DifT for PC (both programs in one package) ... $30 

Updated! 6-Pack of Editors (baker's half-dozen public domain editors for use, study & hacking; includes microEmaes 3.10 & Stevie, a vi clone) .... $30 

Crunch Pack (14 file compression & expansion programs) ....$30 

Pascal P-Code Com pi ler& Interpreter or Pascal-to-C Translator (Wirt h standard Pascal) ..$25 

NEW! PC-MA1L(UUCP mailer by Wietse Z. Venema; send, receive, and manage UUCP mail) ..$25 

FLEX (fast lexical analyzer generator; new, improved LEX; official BSD Version 2.1 with docs) ..$25 

Ust-Pac (C functions for lists, slacks, and queues) ..$25 

Using C++Library (the code from the book by Bnice Eckel and then some; Zortech 2.0 compatible) ... $25 

A68 (68000 cross-assembler) ... $20 

XLT Macro Processor (general purpose textlranslator) ..... $20 

Data 

Moby Pronuncialor (150,000 words & phrases encoded with full IPA pronunciation & emphasis points; 900 distinguished by part-of-speech) . $160 

Moby Part-of-Speeen (200,000 words and phrases described by prioritized part(s)-of-speech) .$120 

Moby Hyphenaior (150,000 words fully hyphenaled/syllabified) ... ..$105 

Moby \\tirds (500,000 words & phrases, 9,000 stars, 15,000 names) ....$65 

Smithsonian Astronomical Observatory Subset (right ascension, declination, & magnitude of 258,997 stars) ..$60 

U. S. Cities (names & longitude/latitude of 32,000 U.S. cities and 6,000 state boundary points)..$35 

The World Digitized (100,000 longitude/la tit ude of world country boundaries) ........................... $30 

KST Fon ts (13,200 characters in 139 mixed fonts: specify TJ^C or bitmap format) ..$30 

Updated! Interactive Computer Ephcmerii (high-precision moon, sun, planet & star positions; USNO (no source) & Downey 4.8 (C source)).$30 

IJ. S. Map (35,701 points of slate boundaries) . $15 

The Austin Code Works Voice: (512) 258-0785 

11100 Leajwood Lane info@acw.com BBS: (512) 258-8831 

Austin, Texas 78750-3409 USA FAX: (512) 258-1342 

Free surface shipping for cash in advance For delivery in Texas add 7% Master Card/VIS A 
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hocus your user on Iho next step by creating clean, attractive screens. Use C-WorLhy's windows, 
hidden sub-menu, field validation mouse support, held specific help, and much more 


Only C- Worthy" protects you from the trap 

that keeps 50% of the market from using your software . . . 

TliB Trap : Users will reject your application if the interface is hard to use. They'll never even see the power of your 
program. "If you've messed up the interface, the product is probably dead in the water" 

Jeffrey Tarter, Editor, Soft •Let ter 


The Solution Use C-Worthy's 30 highest-level functions to create applications for windows, menus, editing, help, 
error handling and forms. Or, use a larger mix of 430+ tested, documented, stable functions to finely tailor your 
work. Save one month or more in work effort while making a more thorough and consistent interface for a C 
development project. C-Worthy will produce an interface that pleases even the most demanding user. 


Funclionalily Superior to Competing Environments 


d 


Screens and Windows 

] Exploding tiled or 
—. overlapping. Direct video 
access or virtual, Keep up in S{1 active 

Forms. Optional Form 
Interface Library speeds 
const ructu in of data input 
forms, lets you apptv 
latest research findings to gather and 
validate input. 23 field types, built-in of 
custom validation Provide help at form 
and field levels. User-cantroliable 
movement sequence within the form 


&J — 



Menus Pop-up. Lotus 
stvie, pull-up and pull 
down (windows stvlel 
— Automatically sized to tit 
your choice ot options, header, border 
type Auto-select based on menu item 
hot Lev character you select 

Comprehensive 
E documentation 

1400 Pages, fully indexed, 
plus 10,000+ lines of 
ready do-go code t hat you can run. 
modify and learn from 



ff C-Warthy is a higher lezret approach to human 
interface than other C libraries .. . Our software 
engineering department does not use another 
human interface library/' 

— Kevin Kingdon, Senior Software Engineer, Novell,, Inc, 

(Over 500,000 users of Novell NetWare Utilities use a C-Worthy 
based interface every day.) 

Version 1.1 is even easier to use 

New 250 page manual: The Programmer's Guide will help you 
quickly choose the function that solves your problem. 

Fully integrated mouse support: Your user can now use a 
mouse to select from menus or lists, move around a form, or 
edit text. 

Plus: extended error handling, speaker control, scrolling forms, 
pop-up sub forms, and new field types like: visible lists, 
unsigned long integer, matrix menu, more. 


C-Worthy Interlace Library 

Object only.$195 Form Interface add-on. $100 

Object with Forms. $295 Object with Forms & Source Code ,, $495 

Call for OS/2 Prices Cal! for International Pricing 


Ask for Your FREE Bonus 
Just for Trying C-Worthy with 
a 60 Day Moneyback Guarantee. 


^solution 
3 ysterns 


Call 800-821-2492 ext. 372 

(in MA and outside U.S. 617-337-6963) 


541 Main Street, Suite 410 
South Weymouth, MA 02190 
617-337-6963 
Fax: 617-337-7719 

C ■ VVtrrthv is a registered trademark oi Custom Design Systems, Im 


BONUS Guidelines for Designing User interface Software. 

Contains 944 guidelines, including graphic functions 
and data display, 4% pages, $38.95, 
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PROGRAMMING PA1A0JGMS 


Wrapping Up 
Software 

Development ’90 



“Can you imagine— the Berlin Wall 
breached! Free elections in Poland and 
Czechoslovakia! Ihe Soviet leader pro¬ 
claiming freedom of religion while vis¬ 
it ing the pope! r fhe Romanian dictator 
gettingfrosted on Christmas Day! Bush 
found the whole sequence of events 
unbelievable, dizzying, even a little hit 
frightening — and yet, unquestionably 
the fat lady had opened her mouth and 
was hitting high C ." 

—Jamie Malinowski 

/ / ee,” the president marveled 

• • / in his trademark nasal 
1 T whine and 1950s sixth- 
grade vocabulary, "it seems 
like it was only yesterday that their 
Premier was making trouble all the time 
and saying he was gonna bury us and 
stuff, and now their whole darn evil 
empire looks like it's coming apart. 
Just look at what’s happened with their 
Mac products and Turbo Modula-2 and 
Turbo Basic. And what was that busi¬ 
ness at the SD '90 conference about 
Wallsoft’s C compiler? Why’d they let 
a competitor speak at their press con¬ 
ference? Well, they must have got some 
bad Perrier down in Scotts Valley. 

“It’s pretty neat for us guys, that's for 


Michael Swaine 


sure," he told Steve “Wally" Ballmer, 
his squeaky-voiced confidante. “Now 
maybe the press wall talk about that 
instead of always picking on us about 
our problems here at home or our prob¬ 
lems with our so-called buddies at TBM. ,T 
Blood brother oaths sworn in the child¬ 
hood of the industry didn't seem to 
mean much in these grown-up days. 

Chastened by this thought of the chal¬ 


lenges that still lay before him, the presi¬ 
dent frowned at his long-time friend. 
"Gee. IPs tough being big, Wally,” he 
said. 

Drugs, Bugs, and fhe DoD 

Having joked about bugs as drugs in 
my February “Flames,” I was interested 
to see that familiar DDJ author Do- 
While Jones was speaking about de¬ 
buggers as a drug at Miller-Free man's 
Software Development *90 in February. 

“When you get sick," Jones said, “you 
should take medicine until you get well. 
Then you should stop." When your soft¬ 
ware is sick, he reasoned, you should 
use a debugger to find the problem. 
When you find the problem, you should 
put the debugger back on the shelf 

Debugger abuse, Jones says, comes 
from using a debugger when the pro¬ 
gram really isn't sick. Sick programs 
include those inherited in a messed-up 
state from someone else, and your own 
programs when they quit working sud¬ 
denly, perhaps due to a change in the 
hardware or compiler or operating sys¬ 
tem, If something like this isn’t wrong 
with the program, you shouldn’t use a 
debugger, he says, because you will 
get hooked, starting a cycle of abuse: 
Dependence on a debugger makes for 
weak programmers w r ho write sick soft¬ 
ware that can’t be debugged without a 
debugger. 

His point is that you usually don’t 
need a debugger, that your know r ledge, 
skills, and insight into the structure of 
the code constitute the best possible 
debugger. But you can’t use your knowl¬ 
edge of the structure of code that has 
none. Writing well-structured programs 
is the prerequisite to rediscovering “the 
lost art of debugging,” 

As Jones describes it, the lost art is 


one of analyzing data flow. In a hierar¬ 
chically structured program, modules 
at one level invoke modules at the 
next lower level, passing data to them, 
typically as parameters, getting data 
back, possibly as function values. De¬ 
bugging a program consists of examin¬ 
ing this data flow. The techniques he 
describes shouldn't be a revelation to 
any DDJ reader, but the kind of rigor 
he promotes in their use is perhaps 
uncommon. 

You can test the data flow into and 
out of a module by writing a driver for 
the module. The driver sends selected 
data to the module and examines the 
results. This tests the module in isola¬ 
tion, but doesn’t reflect its interaction 
with other modules. 

For this, you need an integration test 
driver that calls the module one level 
higher than the modules you want to 
test. Data values are fed to it in order 
to check the interaction of the modules 
it invokes. 

Finally, you can substitute a diag¬ 
nostic module for any module in your 
program. A diagnostic module has the 
same name and parameters as the real 
module, but has a body that is simple 
and diagnostic. That is, iL isn’L so com¬ 
plicated that it could reasonably be a 
source of errors, and it does nothing 
but give useful information on the data- 
passing structure of which the module 
is a part. 

In making his point, Jones used the 
word "hacker” to refer to one who 
pokes at the problem more or less at 
random until finding a fix that works. 
The word has a range of meanings, 
some good, some not, and this use is 
a legitimate use from the pejorative 
end of the word’s meaning range. It 
was interesting, then, to find that he 
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Turbo Basic 

100 

67 

64 

QuickBASIC 

99 

67 

64 

Basic Dev. Sys. 7.0 

495 

329 
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Lattice C - 6.0 

250 

156 

143 

Microsoft 0 5,1 

450 

287 

283 

Microsoft Quick C 

99 

67 

64 

Turbo C by Borland 

150 

98 

94 
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Clarion 

845 

519 

499 

Paradox 3.0 

DBASE 

725 

489 

479 

Clipper Summer "87 
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dBASE IV 
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489 

479 

FoxBASE + 2.1 

DBASE TOOLS 

395 
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200 
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285 Save Save 
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100 
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79 
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99 

93 

EDITORS 




BRIEF 

199 Save Save 

Epsilon 

FORTRAN 
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MS FORTRAN 
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450 
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100 
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espoused a distinctly hackerish phi¬ 
losophy in another talk at SD '90, 

Tliis was a discussion of the differ¬ 
ence between engineers and computer 
scientists. Most of what lie said was 
uncontroversial: Engineers are typically 
better educated in the physical sciences, 
computer scientists better grounded in 
a variety of programming languages. 
But the key differences, he said, are 
philosophical. Computer scientists and 
engineers have different ideas of econ¬ 
omy; engineers are trained to look at 
the whole system, while computer sci¬ 
entists see the hardware as the plat¬ 
form, that is, as a given; computer sci¬ 
entists want to apply the best algorithm 
for the task (and are better equipped 
to do so), while engineers let the task 
dictate criteria for acceptability of an 
algorithm. 

Jones is an engineer, and presented 
the engineering approach as the more 
hackerish, the more ad hoc of the two: 
Solve the problem no matter what. Here 
are some of the kinds of ad hoc, hack¬ 
erish things Jones was saying: 

* Most embedded systems don’t need 
any kind of operating system. 

* Data structures aren’t important if you 
only have a few variables and RAM 
is limited, 

* Tools are overrated. 

Taken together, the talks make a point 
at a higher level. On the one hand, 
structure your code so that you can 
debug it by hand, and structure your 
approach to debugging. On the other, 
get the job done, meet the target launch 
date, satisfy the client. Together, the 
talks say simply, suit the tactic to the 
task. Every programmer should have a 
rid i a >11 ect i< >n of vva ys c i f apprt>ach i n g 
a problem — a full set of intellectual 
tools. Structure is essential but so is 
flexibility. 

Flexibility is a good trait for any soft¬ 
ware developer to cultivate. Do-While 
Jones is a Department of Defense engi¬ 
neer, like many who push bits for a 
living. One speaker at SD 90, William 
Roetzheim, speculated that half the soft¬ 
ware engineers in America were now 
or would be at some time in the future 
writing to DoD specs. Well. I don't 
relish the thought of anyone losing his 
or her job, but I am skeptical. This 
would not seem to be the best time to 
begin learning Ada. 

The Big Challenge of Programming 
in the Large 

"Stop talking of war cause we've beard 
it all before. Why don tyou go out there 
and do something useful?” 

— Sinead O'Connor 


The image: The development team as 
bureaucracy, ideas trampled under po¬ 
litical arguments, progress held up by 
mandatory progress reports, brilliant 
developers brought down to the level 
of their feeblest teammates. 

The reality: The same thing, all too 
often. There appear to be excellent 
reasons to fear and to loathe the devel- 

Knowledge, skills, and 
insight into the structure 
of the code constitute 
the best possible 
debugger 


opmenl team, and to long for the free¬ 
dom to just write the damn thing. We 
all know the stories of the lone pro¬ 
grammers who created masterpieces* 
It may be unrealistic to think that large 
software projects can be done any other 
way than through development teams, 
but it can be an inviting fantasy. 

And yet, there are the stories of the 
team that worked. And must have even 
experienced that golden time, when 
ilie team fed off each others’ talents 
and the result was a collaboration none 
of the participants could have done 
alone, and that all were proud of. OK, 
maybe it was only the Pringles can 
sculpture that we built on the Dean's 
front porch when we were freshmen, 
but when it comes to that sense of 
shared ownership of the work, is build¬ 
ing Pringles can towers any different 
from writing for Presentation Manager? 

What's The Secret? 

The toughest problems usually turn out 
to be the ones involving other people. 
What we suspect seems to be true: 
Group dynamics may Ik 1 the most im¬ 
portant factor in software development 
group success. As Richard Cohen, speak¬ 
ing at SD ’90, said “software develop¬ 
ment productivity is more strongly af¬ 
fected by people- and team-related is¬ 
sues than [by] any other variable under 
the ma n ageme nt's controlT 

And teams are increasingly going to 
be where it T s at. Programming in the 
large is — err — getting bigger. Ken Orr 
maintains that coding skill grows less 
and less important as the project gets 
bigger. “For people trained in good 
softw are engineering approaches, writ¬ 
ing individual programs that aren't very 
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large or complex is not a critical skill. 
On the other hand, the planning, archi¬ 
tecture, requirements, and design of large 
suites of data files and programs (pro¬ 
gramming in the large) are critical skills 
land! will become more so. The need 
for software engineers will remain acute, 
but increasingly these people will be 
writing systems, not programs.” 

If programming in the large is the 
task of the future, team programming 
is the paradigm of the future. Cohen 
nailed down what may be the essence 
of how successful teamwork feels: l A 
real team,” he said, “is one in which 
the group feels common ownership of 
the problem and its solution.” Many 
speakers at SD f 90 talked about prob¬ 
lems involved in team programming, 
managing software engineering projects, 
programming in the large. I didn’t catch 
all their talks, but after the conference 
1 sifted through the proceedings and 
my notes, and found that many of them 
dealt with the search for ways to achieve 
that sense of common ownership of 
the work. 

If s an important search. Changes are 
afoot, SD ’90 speaker Tim Twinam says, 
and the customer may well start calling 
more of the shots. The free ride of the 
Trappist technician may not end this 
year, but there is an inherent instability 
that will some day shake out. 

Vern Crandall and Larry Constantine 
have given some thought to the group 
structures conducive to good teamwork. 
Crandall, who worked at Novell, claims 
that fresh thinking is required in this 
area because most of the old answers, 
the software methodologies, including 
Orris data-struct ured system develop¬ 
ment (DSSD), were developed for MTS 
development work, not for commer¬ 
cial software development, “We need 
a product-oriented approach,” he said. 
He lists some of the issues that are 
unique Lo or more important in com¬ 
mercial software development than in 
MIS: 

* Ill-defined users (you can’t walk down 
the hall and look over their shoulders 
to see what they're doing wrong); 

* Programming Lo a moving target (the 
market changes during the develop¬ 
ment process); 

* Multiple, complex models (the batch 
mode of early MLS is history; today a 
commercial product may have aspects 
of several models, including real¬ 
time operating system, embedded sys¬ 
tem, control software, distributed 
processing, communications, WAN, 
LAN, device driver, and database); 

* Multiple industry standards and plat¬ 
forms; 

* Many quality issues (reliability, instal- 


lability, configurability, serviceability, 
usability, interoperability, perfor¬ 
mance, security, recoverability, and 
migration); and difficulties in customer 
education and support. 

At least six groups of people must all 
work together well to make the project 
come off: Marketing, software devel¬ 
opment, software testing, software main¬ 
tenance, documentation, and human 
factors. This is a complex, interrelated 
system of individuals with different skills 
and interests, all pushing to meet a 
common deadline that is invariably too 


tight. Crandall claims that flat and net¬ 
work management structures don’t work 
in such an environment. He points out, 
furthermore, that software developers 
are creative people and that rules, regu¬ 
lations, and restrictions need to be kept 
to a minimum to avoid stifling their 
creativity. He hails the benefits of con¬ 
sensus management in maintaining the 
flexibility needed to let creative people 
solve problems together, But the flexi¬ 
bility and creativity can cause the de¬ 
velopers to get off track, so a lot of 
supervision is necessary, as well as a 
lot of encouragement and direction. 
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What will computing be like in the 90's? 

How will distributed computing affect business? 
How do you take advantage of Open Systems? 
How do you write software for the X Window System ? 


May 21 to 24, San Jose, California 
Call (617) 547-0510 for free poster and information packet 

Xhibition 90 is sponsored by: Integrated Computer Solutions, Inc., 163 Harvard Street, 
Cambridge,, MA 02139, Fax: [617) T547-07SH, E-Mail xhibilMcs.com. 

The X Window System Is a ttadcntaiK of the Mas sadui sett* Institute of Technotagy. 
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POWERFUL 
MDVENTRY 
SCREENS 
WITH 

OWER 
SCREEN 

Design screens and menus with FAINT rM , 
placing input fields and messages precisely 
where you want them to appear in your final 
application. PAINT stores screen definitions 
in a single file — which can he modified 
without recompiling or relinking your 
application. Your program manages screen 
display and I/O through the POWER SCREEN 
Runtime Library. All essential features are 
supported, including: 

# Block multi-field or single-field I/O 
♦ Automatic range checking ♦ Configurable 
editing/menu key definitions ♦ Application 
context-sensitive, cross-referenced help 
♦ Virtual/automatic scrolling screens within 
viewports ♦ Multiple, overlapping viewport 
display ♦ Plus much, much more! 

The Runtime Library can be linked directly 
with Turbo Pascal applications, or installed as 
memory resident. 

All this for just $149.00 

Includes complete sample programs, a 
comprehensive reference manual, and the 
Norton Instant Access program and guides to 
assist you during program development. And, 
we offer a 30-day money back guarantee. 
Supports Microsoft C/QuickC, Turbo C, Turbo 
Pascal, Quick Pa seal and QuickBASIC. 


Other powerful products from Blaise Computing: 

C ASYNCH MANAGER™ 

$189 

ASYNCH PLUS™ 

$189 

View232™ 

$189 

U TOOLS PLUS™ 

$149 

Turbo C TOOLS™ 

$149 

TOWER TOOLS PLUS™ 

$149 

POWER SEARCH™ 

$149 


Call today for more information 


( 800 ) 333-8087 


Fax (415) 540-1938 


BLAISE COMPUTING INC. 

2.WJ Nimh Si reel. Suiie 31ft Berkeley C A 947 JO 14151 S4U 5441 
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He thinks that a hierarchical structure 
and an emphasis on accountability, chal¬ 
lenge, and expectation is ideal 

How do you achieve this? Crandall 
has some suggestions; No individual 
team should lie larger than six people. 
Products should be staggered, not se¬ 
quentially released. Testing and main¬ 
tenance are skills; hire testing and main¬ 
tenance engineers, not testers, and pay 

People do care about 
quality and will work 
harder and better when 
they feel they are 
working on a product 
they can take pride in 


them as much as the development en¬ 
gineers. Most of the existing models for 
a product life cycle are too long; you 
need to run in parallel as much as 
possible. In particular, software devel¬ 
opment, testing, documentation, and 
human factors (such as screen design) 
must run in parallel. This demands a 
lot of communication and a lot of free¬ 
dom of movement, and that demands 
careful structuring of the teams. 

Larry Constantine is a pioneer in the 
development of structured program¬ 
ming and structured design. He gave 
three talks at SD '90, and in one of them 
defined what he calls the "structured 
open team/’ It’s apparently w hat Cran¬ 
dall is describing. “The structured open 
team uses formal structure to increase 
internal flexibility and adaptability while 
maintaining simple, external interfaces 
and behavior. Internally, it is structured 
to function as a tight-knit, closely inte¬ 
grated team of professional equals with 
clear differentiation of functions only 
as necessary for effective functioning.” 
One of the key aspects of the struc¬ 
tured open team is the default assign¬ 
ment of responsibility. Responsibilities 
ean be shifted around as people's skills 
and knowledge and interests (and the 
changing demands of lhe job) require, 
but there is always a default assign¬ 
ment of responsibilities to ensure that 
nothing falls through the cracks. 

One of the key steps in developing 
a software product is testing. Testing 
is naturally more complex in multipro¬ 
grammer projects, but Crandall turns 


up a surprising fact: Few schools offer 
any training in testing, Roetzheim, 
though, pointed out that testing is an 
important element of DoD specs. Maybe 
more programmers will be using DoD 
specs than 1 speculated earlier. Some 
companies today write to DoD specs 
in certain circumstances even when not 
doing Defense work. 

But the most compelling point to 
come from these talks is that it is the 
human issues that are critical Cohen 
listed some of the human traits that any 
software development team must deal 
with: 

* People make mistakes 

* People are often blind fo their own 
errors 

* People misunderstand each other 

* People fixate 

* People gel overwhelmed by too many 
details 

* People identify with their work 

* People care about quality 

The last point is a particularly good 
one for managers to keep in mind: 
People do care abt ml quality and will 
work harder and better when they feel 
they arc working on a product they can 
take pride In, 

It was P.J. Plauger who sounded the 
contrarian note. There is always dan¬ 
ger in accepting the common view un¬ 
critically, and there seems to be some 
sort of common view of good software 
management emerging (which is not 
to say that good software management 
is emerging), Plauger offered, for the 
stimulation of software management 
thinking, his contrarian list of software 
management heresies: 

* Every software project must be just 
slightly out of control 

* Your goal as a manager is to make 
software projects boring 

* Your obligation to your programmers 
is to answer their telephone calls 

* Your indispensable programmers are 
your greatest liability 

* Teaching BAL programmers C++ is a 
waste of time 

■ Staying within budget is more impor¬ 
tant than making a profit 

* Writing software must be fun, but not 
too much fun 

Plauger justifies these heresies convinc¬ 
ing! y, but I Lhink they are more useful 
if you are allowed to supply your own 
explanations. 


DDJ 
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Headaches: 

If you're like most C 
programmers, communication issues 
are enough to give you a migraine- 
Interrupts are either impossible or 
require tricky assembler routines. 
File transfers are complicated by 
tricky and undocumented versions. 
Communications issues like modem 
control and handshaking using 
XON/XOFF or RTS/CTS simply 
aren't supported by your compiler. 
And lost data will send you for the 
aspirin bottle every time: your 
compiler just can't keep up with the 
ability of today's equipment to send 
torrents of data. 

Fast Relief: 

GrcenleaPs C programming 
libraries have been solving 
headaches for some of the best 
programmers in the business for 
years b ConimLib 3.0 now ends 
communication programming 
problems faster- Interrupt routines 


handle every UART difficulty. File 
Transfers in KERMIT, XMODEM, 
YMODEM, and ASCII are just a 
function call away. Handshaking 
includes support for RTS/CTS and 
XON/XOFF at baud rates up to 
115,2Kb with up to 35 ports on 
multiport boards. Modem control is 
easy with over 40 functions included. 
You can even run different baud 
rates and protocols on several ports 
at the same time. And you'll never 
worry about lost data again with 
CommLib's interrupt-level control. 

Extras: 

All Greenleaf function libraries 
include source code in C and in 
Assembler, telephone support, 
thorough manuals, and a 
subscription to the Greenleaf 
Chronicles, a C programmer's 
newsletter, at no extra charge. 
CommLib 3,0 includes the PDQPIus 
Help Engine and database. All 
major C compilers are supported. 


End your communications 
headaches today. For information 
including free demo software or to 
place your order, call Greenleaf 
Software now: 

1-800-523-9830 
FAX (214)248-7830 

mst 

GREENLEAF 


Greenleaf C libraries arc used by programmers al AT&T Bell Labs, EDS, IBM, General Electric, General Motors, 
Northern Telecom, DuPont, Rockwell, Johnson Controls, Westinghouse, McDonnell Douglas, Kodak, Teledyne, Control 
Data, TI, and many others. 
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N o matter what programming 
environment you work in, 
Que books are your best resource. 
Packed with up-to-date informa¬ 
tion. skill building examples, and 
expert tips, Que provides the tech¬ 
niques you need to design power¬ 
ful programs! 
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HCR/C++, Version 2.2, is the first up¬ 
grade on this C++ compiler from HCR 
Corporation. HCR/C++ operates on 
most 386 and 486 Unix systems. This 
version includes class libraries that con¬ 
tain a comprehensive set of predefined 
objects that are compatible with the 
reusable object capabilities of C++. HCR/ 
C++ comes with an enhanced release 
of dbXtra, the window-oriented debug¬ 
ger compatible with Berkeley’s DBX. 

HCR/C++ 2.2 includes the set of class 
libraries defined by AT&T and those 
in HCR/C++ 2.1, as well as the NIH 
(National Institute of Health) libraries, 
which provide classes for strings, linked 
lists, date and time conversions, in¬ 
dexed arrays, hash tables, regular ex¬ 
pressions, and vector operations. The 
Interviews libraries that were devel¬ 
oped at Stanford University and pro¬ 
vide an interface to X Windows are 
also part of die package. The product 
should be available by now, and retails 
for $995, Version 2,0 customers can 
upgrade for $99, Reader serv ice no. 23- 
HCR Corporation 
130 Bloor St, West, 10th Floor 
Toronto, One Canada M5S 1N5 
416-922-1937 

The bStrings Library for G, which adds 
dynamic string-handling capabilities to 
the C language, is available from KRM 
Communications. The bStrings Library 
provides dynamic strings without frag¬ 
menting memory. Over 130 string ma¬ 
nipulation routines are provided, which 
duplicate most every string' function 
available in Basic, as well as some not 
found in that language. The library sup¬ 
ports functions that cut, copy, paste, 
clear, and overwrite whole strings or 
sections of strings, and will work with 
most screen management packages. 

This library is available for Borland’s 
Turbo C 2,0, Microsoft C 5.0/5.1 and 
QuickC 2.0. Both versions are provided 
with each order, and come with a 30 
day money-hack guarantee. The pro¬ 
duct sells for $89-95 ■ Reader service 
no. 36 , 

KBM Communications, Inc. 

2401 Lake Park Dr., Ste, 160 
Atlanta, GA 30080 
800-227-0303 

A QuickBasic file indexing program. 
Index Manager, has been released by 
CDP Consultants. This product sup¬ 
posedly gives programmers die ability 
to create B+ tree files indexed within 
their QuickBasic programs. It allows 
random file access by full key, brows¬ 
ing through files by partial key, or sort¬ 
ing forward or backward. One external 
subroutine performs ail of Index Man¬ 


ager’s functions, and the programmer 
still retains full, control over all data 
files, as only indexes are managed. 

Indexes are created with a prefix B+ 
tree. The program is written in assem¬ 
bler language, and utilizes a large cache 
buffer for keeping important index re¬ 
cords in memory. A demo version can 
be downloaded on CompuServe (GO 
MSSYS) on data library 1 or 2, called 
INDEXM.ARC, and GTnie CM 505) on 
data library 10, file 828. The program 
costs $59. Reader serv ice no. 25- 
CDP Consultants 
1700 Circo del Cielo Dr. 

El Ca jon, CA 92020 
619- 440- 6482 

New r run-time tools are now available 
from Gold Hill Computers for its de¬ 
velopment environments Gold Works II 
and GCLISP Developer 3 1 The com¬ 
pany claims that these products will 
produce applications that can be in- 
voked directly from DOS or Microsoft 
Windows/286, that they will load as 
much as five times faster than applica¬ 
tions loaded under the development 
environments, and that they will re¬ 
quire much less memory, 

GCLISP Runtime supports the deliv¬ 
ery of GCLISP Developer 3-1 applica¬ 
tions, The Lisp run-time configuration 
requires 1 Mbyte of extended memory, 
and so can deliver applications with 
less than 2 Mbytes of memory. 
Gold works 11/PC Runtime configura¬ 
tion requires 2 Mbytes of extended mem¬ 
ory, with 4 Mbytes memory targeted 
for end-user machines, and is integrated 
with external programs such as Lotus 
1 -2-3, dBase III, and C Gold Hill’s Starter- 
Pak is $1000 for GCLISP 3.1 and $1500 
for Gold works II/PC Reader service 
no. 27. 

Gold Hill Computers, Jnc. 

25 Landsdowne St. 

Cambridge, MA 02139 
617-621 -3300 
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PRO-C 

TheC Source Code Applie*rk^G*r*war 


Accelerate 
Your Productivity 


“Mary had a 4GL 
whose performance 
was very slow 
and everywhere 
that Mary went 
the run-times 
had to go.” 


New 

Lower Price 
and Free 

PRO-C Work Bench 


Pro-C gives you the greatest gift in the computer world - time. You get high quality, 
fully commented, error free C source code in a fraction of the time it would take to 
write it by hand. 

Pro-C has always saved you time and that saved you money. Now you save even 
more. Vestronix has dropped the price of Pro-C from $675 US to $399.00! And Pro-C 
Work Bench, the C source code libraries that let you quickly customize your 
application, is absolutely FREE! A great program at great savings. 

Pro-C will increase your ability to create programs quickly by generating the source 
code for menus, reports, screens, windows, and multi-file batch updates. Textbook 
quality C code is written by us, while the elegant system solutions and exciting new 
algorithms are created by you. 

Pro-C looks and feels like a 4GL, but it’s not. You can do prototyping, layout, design 
and generation of applications without learning a proprietary language, needing 
massive amounts of memory, or ending up with slow running programs. Best of all 
Pro-C doesn't require any run-time licenses. Finally, a company that treats you like 
royalty instead of forcing you to pay them. 

Pro-C - the programming partner that does the boring, repetitive coding without 
complaint, pays for itself every time you use it, and doesn’t argue with your obviously 
brilliant program designs. 


PRO-C 


With PRO-C, everybody’s a winner. 
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C PROGRAMMING 


CSORT: A Saga of 
a Sort 


T hose of you with mainframe ex¬ 
perience know that a common 
and indispensable utility program 
in that environment is the file 
sort program. Many batch applications 
involve the generation of reports taken 
from data hies that you maintain in se¬ 
quences other than the sequence needed 
for the report at hand, l remember the 
two- and three-way tape sorts on the 
IBM 1401 from as far back as 1961. It 
would have been unthinkable to try to 
design a system without one. 

The Mainframe Tape Sort 

Here's how such a sort works in the 
typical tape-drive configuration of yore. 
You need at least four tape drives to 
run a two-way sort. The unsorted file 
starts out on the first tape drive, and the 
other three have scratch reels of tape. 
A file of parameters (usually on a con¬ 
trol card) tells the sort program the size 
of the file's records and the location, 
length, and sequence (ascending or de¬ 
scending) of each of the fields to be 
sorted. 

Pass One, the Input Pass — The 

sort program reads as many records 
into memory as the CPU can hold and 
sorts them in an array. Then it writes 
the sorted block of records to the third 
tape drive. Next, it reads and sorts an¬ 
other block of records and writes that 


Al Stevens 


block to the fourth drive, then the next 
block to the third, and so on until all 
the input records have been read. Drives 
3 and 4 now each contain multiple 
blocks of individually sorted records, 
and this is the end of the first pass. 

During the first pass, the block size 
is restricted to the amount of memory 
that is available. Block sizes double 
during subsequent passes because each 



block is in sequence, and the program 
reads them a record at a time to per¬ 
form the merge. 

Pass Two, the Merge-down Pass — 

The computer operator replaces the 
input tape on drive 1 with a fourth 
scratch tape, and the sort program 
merges the first block from drive 3 with 
the first block from drive 4, writing the 
merged block onto drive 1. Then it 
would merge the next blocks from 
drives 3 and 4 onto drive 2, This flip- 
flop continues until all the blocks from 
drives 3 and 4 are merged into drives 
1 and 2, which together now contain 
half as many blocks as 3 and 4, (The 
old-timers among my readers are lo¬ 
ginning to get bored.) 

Pass Three, the Output Pass — 
The merges continue back and forth 
with each pass reducing the number 
of ordered blocks by half and doubling 
the size of each block until at the final 
pass there is only one block on either 
drive 1 or 3, and this tape contains the 
sorted file, which can be read by the 
application. 

Sordid Dota on Micros 

When 1 began working with micro¬ 
computers in the mid-seventies l looked 
for the standard sort utility program 
that I thought would come with oper¬ 
ating systems, and I found none. The 
first significant application I wrote for 
an IMSAI 8080 needed file sorting, and 
a search turned up a CP/M program 
called -i QSORT/ J but I was surprised 
to learn that it was difficult to find 
what had always been an indispensa¬ 
ble utility program. 

With the PC and MS-DOS came the 
SORT filter program, but it has three 
serious limitations: It can only sort as 
many records as will fit into 64K, it can 
sort only one field of the file's records, 
and, being a filter, it works only with 
text files. 


The In-line Sort 

So much for the file sort utility pro¬ 
gram. Now let's consider the in-line 
sort feature. Anyone who has pro¬ 
grammed in many computer languages 
has accumulated some favorite features 
about each one. The ideal personal 
language would have all those features 
wrapped into one. Of course, when 
you try to build a language with every¬ 
one's favorite features, you get a com¬ 
mittee-designed language — you get 
ADA, perhaps. The perfect personal 
language would be so extensible that 
each of us could design his own syntax 
and data types, plugging in the features 
we treasure and leaving out the ones 
we do not. The flaw r in that approach 
is that no one could read anyone else's 
code, and so, instead of each of us build¬ 
ing a personal ideal language, we ebb 
to tiie committee approach, standards 
emerge, and we strive to conform. 

As a full-time C programmer and 
writer, I often think of language fea¬ 
tures in terms of the features I liked 
about languages past that C does not 
have. For example, the string functions 
of Basic are missing in C, Cobol’s MOVE 
CORRESPONDING would be handy in 
C where the C structure assignment 
would assign only those members that 
have the same names. You can add 
both of these features to C by building 
appropriate C++ classes if you are us¬ 
ing the C++ extensions to C, and so the 
dubious realm of Lhe customized lan¬ 
guage looms again in the near future. 
There is one feature I liked about 
Cohol that you can build in traditional 
C without extending the language other 
than with a few functions. That feature 
is the SORT verb and it is relevant to 
this month's rambling, 

A Cobol program can pass records 
to the SORT verb one at time and then 
later retrieve those records in the sorted 
sequence. There are several advantages 
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to this technique. One is that the pro¬ 
gram does not need to prepare an un¬ 
sorted file, exit to a sort utility program, 
and then execute a third program to 
process the sorted file. You can form 
each unsorted record from one or more 
sources just prior to sending it off to 
be sorted, and you can transform the 
sorted records into another format be¬ 
fore doing anything with them. No in¬ 
termediate file of uniquely formatted 
records is involved. 

The C qsort function is similar to this 
approach except that it sorts an m- 
niemory array, and so all your data 
records must fit into memory. A true 


in-line sort will accept as many records, 
one at a time, as you want to give it, 
and will return those records to you, 
one at a time, in sorted order. 

So now we have defined two. re¬ 
quirements missing from the C language 
and the microprocessor operating sys¬ 
tem environment. Why, after ten solid 
years of micro use, are these features 
not standard? Obviously, they are not 
widely needed for some reason, and 
that reason is, I guess, that the per¬ 
sonal, inexpensive nature of the PC has 
redefined the way we design systems. 
Most PC programs today are interac¬ 
tive, If they involve multiple sequences 


of data files, they use indexed database 
managers or higher-level DBMS lan¬ 
guages that deal with sorting in their 
own ways. OK, so most of the time we 
do not need a sort program or an in¬ 
line sort. But what about the few times 
when we do? Nothing else will do. 

About five years ago, I tackled this 
problem by writing a C language in¬ 
line sort function for some programs 
for a video Lape store. Later I used it as 
the sort engine for a stand-alone sort 
program that sorts disk files. I used 
pre-ANSI Aztec C for Lhe IBM-PC and 
published the code in a book ( CDevel¬ 
opment Tools for the IBM PC, Brady 
Books) in 1986. Since then 1 have reused 
that program many times in circum¬ 
stances where I might have chosen a 
more accessible but less appropriate 
solution had I not already had this little 
sort program. Now that the ANSI stan¬ 
dard definition of C is in place, it’s time 
to update that program, so this month 
we promote it to the standard and pub¬ 
lish it here, 

CSORT 

What follows is CSORT, a sorting facil¬ 
ity that you can use from within your 
programs or from the command line. 
Although 1 developed it to use in CP/M 
systems and later in MS-DOS, it is not 
wired to either of those environments 
and should easily port to another plat¬ 
form where a standard C compiler is 
available. 

The CSORT project has two parts, 
the in-line sort and the file sort pro¬ 
gram. To use the in-line sort in a C 
program, you describe the characteris¬ 
tics of the records to be sorted and 
send them, one at a time, off to the sort 
process. After you have sent the last of 
the records, you send a NULL and go 
about your business. When you are 
ready for the records in the sorted se¬ 
quence, you call the sort program and 
it returns the records, one for each call. 
After it has returned the last of the 
sorted records t it returns a NULL, Your 
program is essentially the polar ends 
of a three-phase pipe. 

You and CSORT pass records back 
and forth with pointers. CSORT makes 
a copy of the record you pass it, so you 
can safely reuse the space the record 
occupied. CSORT expects you to do 
the same because it might reuse the 
record space that is pointed to to be a 
previous pointer it returned. 

CSORT requires that you sort fixed- 
length records, but the records them¬ 
selves do not need to be in text format. 
The sort comparison uses the strniemp 
function to compare fields, so they do 
not need to be null-terminated. 


Here’s HowWe Protect 
Y)ur Softwaja^^d Profits Better. 



Because our key interrogation routines ore encrypted and our hardware is custom 
r wtrcd to distinguish eac h of our clients' keys, our clients have the highest degree of security 
F available. Unlike other manufacturers, our rou tines assum e responsibility for all hardware, sofr 
ware and timing issues. And this means your engineering lime and money won't be wasted reinvent¬ 
ing protection schemes. 

We offer two high security products for copy control: the KEY and the MEMORY KEY™ 

Our protection devices can also be used for serialization techniques, softw are l easing, modular software 
management, creative revenue collection, demo control and a path for future upgrades. 

The information stored in the MEMORY KEY can be conveniently reprogrammed by your application 
software or at the end user s site via software disk or modem 
All our products attach conveniently to the printer port, are transparent and allow for unlimited back ups. 

Bor serious software protection, call now. And start 
protecting your profits. Hands down, we re better 
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If You Want To Tall 
Fast DBMS 
Call 1-800-db-RAIMA 
And Start Screaming 


w, 



dbVISTA Puts You in Some 
Fast Company. Thousands of C 
programmers in over 50 countries 
worldwide use db_VTSTA III, 
including APPLE, ARCO, AT&T, 
EDS, Federal Express, Hewlett- 
Packard. IBM, NASA... 

Don’t wait. Call Raima for more 
information about how you can 
build screaming-fast applications! 


Database Management System 
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db_VISTA III is written 
for C Programmers. 
Source code available. 

The interactive database ulilities and 
outstanding documentation make 
db_VISTA III easy to learn. All 
applications are portable to VMS, 
UNIX, OS/2, MS-DOS, even 
Macintosh. No royalties. 


You’ll be screaming, all right, 
db VISTA III from Raima 
combines the flexibility of a 
relational DBMS and the 
lightning speed of the network 
database model. 


db_VISTA III is Fast . Using 
benchmarks originated at PC Tech 
Journal Laboratories, db_VISTA HI 
measured 3 to 12 rimes faster than 
the average relational database! 
Call us and we’ll send you the 
results. 


Relational and Network Model 
Technology for Programming 

Flexibility. Retrieve a record fast 
using the relational keyed access 
method and all related records can 
be immediately available using the 
network database model, You 
decide how to combine these for 
best application performance, 


SQL Support with SQL- 
based db_QUERY, 
db_VlSTA Ill’s relational 
query and report writer. 


( 1 - 800 - 327 - 2462 ) 
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No Matter What Your 
Operating System-We’ve Got 
A Number 
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(continued from page 128) 

TheCSORTAPI 

Following is the application program 
interface for CSORT. Listing One, page 
144 t is CSORT. H, w hich contains sev¬ 
eral control values For the sort. The 
NOFLDS global value specifies the maxi¬ 
mum number of fields that can be in¬ 
volved in the son of the record. The 
MOSTMEM and LEASTMEM values con¬ 
trol the appropriation of a buffer from 
the heap for sorting, MOSTMEM is the 
amount you try for, and LEASTMEM is 
the least amount you wall accept. I have 
them set to work w ithin a small-model 
program on the PC. 


Here are the prototypes and descrip¬ 
tions of the CSORT API functions. 

int imt_sort(struct s Jirm *prms); To 

sort records, you must describe them. 
The 5 _prm structure contains the defi¬ 
nition of the records to be sorted. It is 
defined in CSORTH. You will declare 
the structure anti initialize it as follows. 
Assign the record length to the rejen 
member The $ Jld array of substruc¬ 
tures will contain entries for each of 
the fields to be sorted. The s_fldf_ pas 
member contains the record position 
for the field. This value is relative to 
one. If there are lower than NOFLDS 


fields, the terminal entry in this array 
will contain a zero value for this mem- 
lie r. The s_fld.f_ ten member is the 
length of the field. The s_fld ad mem¬ 
ber is the character "a” if the field is to 
lie collated in ascending sequence and 
“d” if it is to be collated in descending 
sequence. The first field in the array is 
the major sort field; the last is the mi¬ 
nor; all others are intermediate. So, if 
you need records in, for example, divi¬ 
sion number, department number, and 
employee number sequence, you will 
define the fields in that order in the 
array. With the array properly initial- 
ized, call the initjsort function. If the 
sort may proceed — if enough mem¬ 
ory is available-—the function returns 
zero. Otherwise it returns -1. 
void sortfehar *rcd); With the sort 
program properly initialized through 
initjsort, you may send records to be 
sorted by calling the sort function once 
for each record. Pass a pointer to the 
record, anti the sort function will make 
a copy of the record. After you have 
passed the last record, pass a NULL 
pointer. This tells the sort function to 
finish the sort and prepare to return 
sorted records. 

char *sort_op(void); To retrieve sor¬ 
ted records, call the sort_op function. 
Each call to it will return a pointer to 
the next record in the sorted sequence. 
After the last record comes back, the 
sort_op returns a NULL pointer. 
void sort_stats(void); This function 
displays some of the values used in the 
son function. 

The FUESORT Program 

Listing Two, page 144, is FILESORT.C, 
a program that uses the CSORT API to 
implement a stand-alone file sort pro¬ 
gram. You run it by entering the file¬ 
name, record length, and field parame¬ 
ters on the command line, It uses the 
API in the manner just described, 

CSORT Internals 

Listing Three, page 144, is CSORT.C, 
which contains the in-line sort func¬ 
tions. The first function to discuss is 
initjsort* which you call to initiate sort¬ 
ing. It calls appr_mem to allocate a 
block of memory in which to sort, in¬ 
itializes the sorting parameters, and re¬ 
turns. 

The sort function accepts records to 
sort from the calling application. At 
first it simply copies them into the buffer, 
one after the other. When the buffer is 
full, the sort function calls the standard 
qsort function io sort the records in the 
buffer. This becomes a block of sorted 
records, also called here a "sequence.” 
The dumpbuff function writes them to 
the sort work file. CSORT uses only 
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The C-Programmer's Pain Reliever 

* C Programs giving you headaches? 

* Tired of having to rewrite code to fit 
into your latest programs? 

* Wish you could avoid the hassle of 
trying to use four different libraries? 


We all know that the standard C library just doesn't cut it In 
today’s market ol fast, user-friendly programs. We also 
know that trying to link together 3 or 4 different add-on 
libraries is often more of a headache than it is worth. 

There is a solution. ASPIRIN, the new package (rom 
Arrowhead Software, eliminates those aches and pains 
at a price that won’t hurt your walletl 



ASPIRIN is not just another forms/windows package. You'll 
have all these capabilities at your fingertips, plus many other 
time-saving features: 

* ISAM database package * Windows 

* Text manipulation • Forms 

* C-code generator * Menus 

* Linked - lists * Utility programs 

* Mouse handling * Step-by-step user's guide 

* Date and time functions * 300 oaae technical auide 
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Serious Assembly. 


Nobody really takes assembly language 
seriously. Nobody, that is, excepL LoLus, 
WordPerfect, Novell, and everyone else 
who needs the tightest, fastest code possible. 

But assembly is tough . .. unless you have 
plenty of ready-lo-use assembly language 
routines at your fingertips. Thai's why indus¬ 
try leaders spend a tot of time and money 
creating their own, proprietary assembly 
language libraries. 

You could spend your valuable develop¬ 
ment time building a library; or you can use 
Spontaneous Assembly, the complete 
assembly language library specifically 
designed for serious assembly language 
development. 

Over GOO functions and macros. 

■ String manipulation ■ Memory manipulation 

* Near/far/relative heap management 

* Double word/quad word integer math 

* Array management, sorting, and searching 

■ Character/numeric/string conversion ■ Buffer 
management * Date and time manipulation 

■ File and directory management ■ File I/O 


• Keyboard I/O * Program/environ mem control 
■ Critical error management • Screen I/O with 
windowing—and more. All carefully 
documented, tested, and ready to use. 

Tight, fast code. Fast. 

Every routine is hand-coded and hand- 
optimized (in assembly, of course). And a 
consistent, register-oriented parameter-passing 
convention makes these routines remarkably 
easy to use. With Spontaneous Assembly, 
coding in assembly is as fast as coding in a 
high-level language—without the overhead. 

Powerful memory model support. 

Spontaneous Assembly unleashes the full 
power of memory models in assembly 
language. It supports all Microsoft/Borland 
standard memory models as well as custom 
models and mixed-model programming. And it 
gives you complete control over segment/group 
names and attributes. 

Extensive documentation. 

A complete reference manual describes every 
function, macro, and variable in detail. Step-by¬ 


step instructions and technical notes explain 
memory models, library customization, 
integration with C, and much more. 

Spontaneous Assembly. 

Serious assembly language programming 
doesn't need to be hard any more. Now it can 
be Spontaneous. 

See for yourself. Call now to take advantage 
of our introductory price. Then use 
Spontaneous Assembly for 60 days. If you're 
not 100% satisfied, send it back for a 
full refund! 

Introductory Price. 

$199 Plus Shipping & Handling. 

Full source code included. No royalties. 

60 day money-back guarantee. 

Visa • MasterCard ■ Discover 

Call now! 

1-800-ASSEMBLY 

Orders * Information * Support 


dasetwo 

DEVELOPMENT 


For HQx86-ba&ed systems running DOS 2 0 or later MASM 5.1 or TASM 10 recommended 

Base Two Development > A Division of Acclaim Technologies* Inc. * ft East 2Q0 North ■ Orem, Utah 3405? * (SOI) 222-9500 
Spontaneous Assembly and Base TWo Development are trademarks of Acclaim Technologies, inc . 
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(continuedfrom page 130) 
one sort work file, unlike the tape sorts 
we discussed earlier. Because this pro¬ 
gram uses disk files, and because di¬ 
rect record addressing is possible, we 
do not need to maintain multiple, serial 
devices for the blocks of sorted records 
after the fashion of a streamer tape 
device. 

When the calling application sends 
a NULL pointer to the sort function, it 
sorts the final sequence, writes it to the 
work file, and calls prep_merge to pre¬ 
pare for when the caller wants sorted 
records. The merge divides the sort 
work buffer into many miniature buff¬ 
ers, one for each sequence that was 
generated by the sort function. These 
buffers contain two or, usually, more 
records. If and while the number of 
sequences is high enough to prevent 
the buffer from being segmented this 
way, prep_merge uses the merge func¬ 
tion to merge groups of two sequences 
into one, halving the number of se¬ 
quences and doubling their sizes. 

When the number of sequences is 
low enough that each one can contrib¬ 
ute at least two records in the son 
buffer, the merge and prep_ merge func¬ 
tions arc done. 

The calling application calls sort_op 
to get sorted records, The sort op func¬ 


tion looks at the first record in each 
buffer segment to find the lowest rec¬ 
ord, It bumps that segment’s record 
pointer and returns a pointer to the 
record it found. When it exhausts a 
buffer segment, it reads more records 
from the associated sequence on the 
sort work file. When all the segments 
are empty, the application has read the 
last sotted record, and the sort pro¬ 
gram signals LhaL it is done by returning 
a NULL pointer. 

TopSpeed C 

Last year I reported that 1 had seen a 
demo of the announced Tops peed C 
compiler from Jensen 8c Partners Inter¬ 
national. The product is shipping now, 
and is a full-featured ANSI-conforming 
compiler with integrated editor, com¬ 
piler, linker, and debugger. I used it to 
upgrade CSORT to the ANSI specifica¬ 
tion and can offer these first impres¬ 
sions. Be advised that I have not yet 
used TSC to build a significant system 
From scratch, so these judgments are 
preliminary. I think you will like this 
product. After reading and following 
the installation procedures, 1 used the 
books only once during the project, 
and that was to learn the format for the 
MAKE project file. Everything else is 
neatly supported with comprehensive 


help windows and intuitive menus. 

TSC has a number of features that l 
haven't used yet but surely will. They 
have built a DOS equivalent of the 
OS/2 dynamic link library (DLL). You 
can build programs that link to their 
libraries at run time. There is a post¬ 
mortem debugger, an assembler and 
disassembler, a program profiler, and 
support for DOS Windows and OS/2 
Presentation Manager program devel¬ 
opment. 

TSC has a few things I'd change. 
Their version of the interrupt function 
type has a severe disability. You can¬ 
not call an interrupt function directly 
or through a function pointer. This pre¬ 
vents you from chaining intercepted 
interrupts and renders TSC ineffectual 
as a TSR development compiler -— un¬ 
less you want to compensate by using 
assembly language. 

Although TSC has the „AX, _BX, etc, 
pseudoregisters of Turbo C, they do 
not support _FLAGS, which makes their 
use in interrupt service routine pro¬ 
gramming even more difficult, 

'fhe tables of contents and indexes 
in most of the documents do not agree 
with the actual page numbers. This is 
an unacceptable lapse in quality con¬ 
trol for any documentation effort, J for¬ 
give that lapse only because the on- 



CURSES/VMS supports all terminals defined by 
VMS TERA1TABLE. Single user license - $799 

FAST with source, the CURSHS Forms Manager - 
FREE with CURSES, 

FORMATION: Dialog boxes, expiring 
viewports and sophisticated menus - normally 
found only under graphics environments - are all 
part of this grown-up human interface tool. 
And, of course, portability to 
environments supporting CURSES. 
D0S-0S/2-UN1X-VMS Source & 

Binary Bundled $399 
D0S-0S/2 Binary Bundled $159 

Take Control. To gel the desired 
terminal display compatibility, I Ixaight 
from Aspen Scientific/ -mCPrfes±Mtt 
Do the same, call now! 


CURSES and FORMATION. 

The Key to UNIX, DOS, OS/2 and VMS 
Window Portability. 

CURSES: The library for C developed who want 
uncluttered portability and power in their screen anti 
keyboard interfaces, CURSES’ device independence and 
fully optimized output allows your application to have only 
one set of C source fifes, the key to 
portability. 

CURSES/PC New Version! Full Unix 
System V.3.2 CURSES including color 
support. Supports EGA 43 and VGA SO 
line modes, and 101 keyboard. 

DOS-QS/2 Source# Binary 
Bundled $349 

DQ&OS/2 Binary Bundled $159 


FG. BOX 72 WHEAT RIDGE, COLORADO 80034-0072 
303-423-8088 
FAX 303-420-6522 

Overseas Distributors: W. Germany: Kfckstein Software 0821451 46 66 ■ Holland; Ijentax 02968-4210 Radix 02014 24 
Trademarks: OS/2: Microsoft UNIX: AT&T; VMS: Digital Equip, Corp. 


132 


Dr Doth $ journal , April 1990 













Commenting Disassembler! 


line documentation is so good. 

TSC tends to leave my cursor other 
than the way it Found it, and it leaves 
all manner of what appears to he tem¬ 
porary work files scattered about my 
source directory. These quirks are an¬ 
noying at best. 

One last gripe, then III relax. 1 re¬ 
joiced when 1 saw the WATCH utility. 
It is a really neat TSR, tossed in for 
good measure, that you can use to 
monitor the calls your program makes 
to DOS, an essential tool for systems 
programmers. 1 do a lot of program¬ 
ming in the Novell NetWare local area 
network environment, and NetWare API 
calls are supersets of the DOS 1NT 0 x 
2L To my dismay, I learned that WATCH 
only watches calls that you select from 
its list of known DOS calls, and there 
seems to be no way to tell it to watch 
the Novell superset list. Rats, Another 
idea well conceived, poody built. 

If it seems that I am overly critical it 
is because these are the things 1 found 
that 1 think you should know about. 
There may l>e others, but, as I said, my 
use of TSC has been limited so Dr. All 
that aside, I like the product and do 
not hesitate to recommend it. It is in 
great shape for the first version of any 
software product and will surely im¬ 
prove with newer versions. The PC 
programmer has a dilemma. There are 
several excellent compilers to choose 
from. By now, there will have been 
benchmarks and reviews and, I am sure, 
you still will not know what to do. 

(The title of this month's column is 
a paraphrase of that of the Bill Mauldin 
book, A Sort of a Saga . His book has 
nothing to do with C or programming, 
hut Mauldin s cartoons and writings and 
that book in particular are timeless and 
were major influences in my young life.) 

Availability 

All source code is available on a single 
disk and online. To order the disk, 
send $14.95 (Calif, residents add sales 
tax) to Dr Doth's Journal, 501 Galves¬ 
ton Dr., Redwood City, CA 94063, or 
call 800-356-2002 (from inside Calif.) 
or 800-533-4372 (from outside Calif.). 
Please specify the issue number and 
format (MS-DOS, Macintosh, Kaypro). 
Source code is also available online 
through the DDf Forum on Compu¬ 
Serve (type GO DDJX The DDJ Listing 
Service (603-882-1599) supports 300/ 
1200/2400 baud, 8-data bits, no parity, 
1-stop bit. Press SPACEBAR when the 
system answers, type: listings (lower¬ 
case) at the log-in prompt. 

DDJ 

(Listings begin on page 144,) 
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The C/Database Toolchest™ 
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compiler. With the C/Database 
Toolchest™. your data requires 
much less disk space than with 
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provides you with an unlimited 
amount of programming flexibility. 

The C/Database Toolchest™ 
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Yes, Virginia, There 
Is a Xerox! 


1 damned near choked on my 
Cheerios [he morning the Mercury* 
News announced that Xerox was 
suing Apple over the Macintosh UI 
copyrights. Land o T Goshen! There is a 
Xerox alter all! I had just about given 
up hope. 

1 have reason to feel specially about 
this whole situation. 1 spent ten years 
at Xerox (1974 - 1984) when much of 
their seminal research into user interface 
concepts took place. 1 was not directly 
involved with that research, but t spoke 
regularly with PARC people who were. 

I played w ith Smalltalk on the Alto pro¬ 
totype workstation, and 1 was one of 
the very first in Xerox MIS/DP trained 
on the Star workstation in early 1981. 
Unfortunately, I was one of the very 
few who ever saw the Star, much less 
worked on it. Had the Star caught on, 
Apple’s suit against Microsoft would 
have been laughed out of court* 

The Apple vs. Xerox Equation 

For those of you who have been living 
in a Dewar's flask since 1985, let me 
recap: Last year Apple sued Microsoft 
and Hewlett Packard, claiming that Mi¬ 
crosoft Windows 2.0 and HP New Wave 
violated Apple’s visual copyrights on 
the Macintosh user interface. Earlier 
this year, parts of the suit concerning 
contractual technicalities were dismissed 
by the judge, leaving only the very 
large question of whether Windows 
2.0 and New Wave indeed infringed 


by Jeff Duntemann KI6RA 


on the Macintosh visual copyright. 

Now Xerox, in its suit, claims that 
Apple appropriated the visual copy¬ 
rights expressed in the Star worksta¬ 
tion before the Macintosh was born, 
and that Xerox, as owner of said copy¬ 
rights, is due royalties from the use of 
its interface. 

There is a wonderful word to apply 
here, as ancient and ineluctable as fate 


itself: Checkmate, No matter which way 
Apple moves, it loses. Why? Because 
if Windows 2.0 infringes on the Macin¬ 
tosh, then the Macintosh infringes on 
the Star. I had to laugh at Apple's im¬ 
mediate protest that it was protecting 
its expression of the ideas pioneered 
by Xerox, and not the ideas themselves. 
Any three-legged salamander blind in 
one eye could tell you that Windows 
2.0 and the Macintosh UI are not iden¬ 
tical expressions, but instead are sepa¬ 
rate expressions of a common philoso¬ 
phy of user interaction. And if the simi¬ 
larities of expression between Windows 
2.0 and the Mac are close enough to 
infringe on the Mac, then the Mac is 
similar enough to the Star to infringe 
upon the Star. Poof! Apple loses its 
claims of ownership. 

It gets better. If Apple changes its 
mind and withdraws its Windows suit, 
Microsoft and HP have excellent 
grounds to complain that Apple brought 
the suit merely to stifle competition, 
leaving it open to prosecution under 
antitrust laws. 

Couldn’t happen to a nicer bunch 
of guys, eh? 

Many people are saying that Xerox 
can't win its suit against Apple (or any¬ 
one else), because it waited far too 
long to bring the suit to begin with. 
This is true, but it may not matter. The 
scrutiny that Xerox will bring to bear 
on the whole question of who authored 
what and when will finally lay Lo rest 
the pernicious lie that Apple has some 
kind of ownersliip of anything with pull¬ 
down menus and overlapping windows. 

Most people haven’t seen the Star, 
so public opinion hasn’t really gone 
up against Apple. I was there, how¬ 
ever, when it happened, and I don’t lie 
about these things: The Xerox Star is 
closer to the Mac than Windows is. 
That’s the golden equation whose so¬ 
lution will, with luck, put windowing 
environments in the public domain and 
end this damned foolishness now and 
forever 



Thinking About Object Design 

Just because you can swing a hammer 
doesn't mean you can design a house* 
That's the message that seems to be 
entering from our first year as Object 
Pascal programmers. People are catch¬ 
ing on to the syntactic nuances of object- 
oriented programming. Creating objects 
and methods is no longer quite the 
mystery it was in 1989. What does seem 
to be a mystery is the big picture of it 
all, containing sizeable questions like, 
“What should be an object? How do 
you divide your application into ob¬ 
jects, and how do you apportion func¬ 
tionality to the objects in an object hier¬ 
archy?’’ This is the old architecture vs. 
carpentry duality made new again by 
the appearance of mass-market OOP 
languages. So put down that hammer 
for a bit* and let’s talk about larger 
issues. 

What Should be an Object? 

fust after Turbo Pascal 5.5 and Quick 
Pascal appeared last May (almost si¬ 
multaneously) people predictably be¬ 
gan jumping on the OOP concept and 
taking it to absurd lengths, just for the 
exhilarating fun of it all. L recall hearing 
about guys who were creating objects 
out of ASCII characters, or even inte¬ 
gers, because it seemed like the politi¬ 
cally correct thing to do at the time. 

As the vanguard soon discovered, 
making Pascal integers and characters 
into objects bought them almost noth¬ 
ing, and cost like hell. The first lesson 
we learned about OOP melted into 
conventional wisdom in record rime: 
Atoms are atoms for a reason. Objects 
are a means of organizing complexity. 
Don’t go looking for complexity where 
there isn’t any. Molecules have to be 
made out of something. 

My own rule of thumb comes dow r n 
to this: Don’t make objects out of any¬ 
thing that the compiler special-cases* 
This includes all fundamental types such 
as Boolean, Char, all numerics, and 
strings* In a language like Modula-2 
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programmer for KBHK-TV, San Francisco, 
and BRIEF user since 1987. 




Wayne Ratliff, 
creator of dBASE, 
president of Ratliff Software Productions, 
and BRIEF user since 1986. 


Of course they need 
completely different kinds of editors. 
That’s why they both use BRIEF 


Let’s face it. There’s no such thing as two pro¬ 
grammers who think alike. Or who work alike. 

Because everybody’s got their own style, their 
own habits. Their own quirky little requirements. 
As well they should. So, where are you going to 
find one editor that satisfies everyone? Simple. 
Look inside a BRIEF® box. 

It’s the right editor, right out of the box. 

What you’ll find inside is an enormously power¬ 
ful, astonishingly easy, and highly-evolved pro¬ 
gram editor. One that works at blinding speed. 
And that's loaded with features designed 
to help you be more productive 
One guaranteed to give you 
excellent results within one 



Hew BRIEF 3.0 highlights 

- With oiir new (Mike macro lan¬ 
guage, CBKIEF. C programmers can 
write macros on the fly and not have 
to switch between C and a different 
macro language. 

* The new source level debugger works 
with both the original BRIEF syntax and 
the new CBRIEF macro language. 

* Maximum lines per file has been increased 
to 4 billion. 

* Ufe’ve added to and improved template editing 

and smart indenting for ABA, Cobol, BASIC, FORTRAN, 
Modula-2, Pascal, and C. 

* We’ve added editable, multiple keystroke macros that can 
be saved and restored. 

" You can even save and restore your window set ups. 

Plus the features that made BRIEF famous, 

■ 300 level UNDO safely net 

■ Flexible windowing, unlimited quantity 

■ Unlimited number of files 

* File sisje limited only by disk space 

■ Regular expression search and replace 

■ BRIEFs LISP like macro language 

■ Tbll-free tech support 


short hour of booting up the first time, 

Youll find features like automatic indenting, 
infinite windowing, and powerful regular expres¬ 
sion searching that goes well beyond the ordinary 
text-matching you're probably used to. 

You'll also find the features that made BRIEF 
famous. Including our near-miraculous UNDO, 
that doesn't just un delete your last keystroke. 

It actually reverses the effect of any command. So 
you can explore, experiment, even make gigantic 
mistakes with hideous consequences, and just 
undo” them. And then continue to undo, 
backing-up through 300 steps. 

What you want is what you get. 
What you'll also find is an editor that 
delights in adapting itself to you. With 
the simple, menu-driven SETUP pro¬ 
gram. you can quickly customize 
indenting style, support for any of 
36 compilers, keyboard configu¬ 
ration, rate of keyboard auto¬ 
repeat, and much more. 

You can even edit BRIEF s macros to 
suit your taste. Or write your own in a snap. 

Computer Language said that BRIEF is capable 
of "almost complete customization,’ 1 And with 
new release 3.0, BRIEF is even more powerful 
and flexible. 

For every programmer, it s a different 
BRIEF. 

At last count, there were over 52,000 copies of 
BRIEF in the field, making life easier and work¬ 
ing time more productive for all kinds of 
programmers-working in all kinds of languages. 


Programmers as different as Wayne Ratliff is from I 
George Brandt, Which means there are over 
52,000 different ways of working, and BRIEF fits 
them all. 

Why not get BRIEF going to work for yon? 
There's no risk. In fact, if you’re not completely 
satisfied that BRIEF is exactly the editor you’ve 
been looking for, just return it within 30 days, and | 
we'll return your money. No questions asked. 

BRIEF 3.0 
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where strings have no special status to 
the compiler, a string object might make 
sense. Certainly a long string type (in 
which you can keep more than 255 
characters) is a prime candidate for 
objecthood. Strings, however, have spe¬ 
cial privileges with respect to text files, 
Read In and Write In, and a whole slew 
of built-in string-handling routines. Fur¬ 
thermore, strings may be returned as 
function results, a capability I would 
be extremely reluctant to give up. En¬ 
casing a Pascal string within an object 
wrapper actually adds complexity to 
an application, and that's not how the 
game is supposed to be played. 

An Exercise in Modeling Reality 

When 1 wrote the tutorials in the Turbo 
Pascal 5,5 OOP Guide, this sort of ques¬ 
tion hadn't occurred to me, as I was 
nearly as new to Object Pascal as the 
rest of the PC world and was running 
but a step and a half ahead of the 
Comprehension Wolves through the 
whole project. What I knew of objects 
came to me from Smalltalk, in which 
everything is an object, not excluding 
atomic particles such as characters and 
integers. But my Smalltalk experience 
kept me in good stead when I had to 
confront questions from readers like, 


"How should 1 divide an application 
up into objects?” and, "How do I de¬ 
fine the boundaries between objects?” 
There's no easy answer this time, but 
Fve worked with a principle that 1 con¬ 
sider very effective: Whenever possi¬ 
ble, reflect in your objects the divisions 
and relationships seen in reality. In other 
words, make your OOP programs simu¬ 
lations even when they're not realty 
simulations. 

There I go again, getting Eastern on 
you. Time to Get Real. 

Artifacts, Not Actions 

Objects were originally conceived by 
Simula's architects as models of de¬ 
ments of reality. Reality is not soup. 
Reality is lumpy, and the lumps, seen 
a pan, are identifiable things with iden¬ 
tifiable functions. A lamp is a thing that 
emits light when you hit its buttons 
correctly. A carpet keeps the oak floors 
from getting scraped. Your Peter Nor¬ 
ton mug is a mechanism that cooper¬ 
ates with gravity to keep your coffee 
out of your lap. Every lump in reality 
has a name and a job, though the ne¬ 
cessity of some, like city planners and 
the rock band Metallica, is seriously 
open to question. 

All of this is second nature to anyone 


who has survived his or her Terrible 
Twos, but I remind you of the nature 
of reality because 1 want you to apply 
it to the way you arrange the concept 
of a program in your mind. Too many 
programmers make their programs like 
you'd make soup, by tossing in a pinch 
of this and half a cup of that and stir¬ 
ring it around until it becomes rela¬ 
tively uniform in color and texture and 
ceases to be lethal. 

Because programming has always 
been an act ion-oriented process, pro¬ 
grammers often begin by asking what 
steps constitute the larger action of the 
program. If you have gotten to this 
point, the cooking has already begun, 
and you’re halfway to soup already. 
Never forget this: A program is not an 
action. A program is an artifact. Once 
you throw the artifact into your con¬ 
ceptual duck-press and squeeze it down 
to a statement of action, you've lost a 
great deal of valuable information about 
the idea of the program. To recap in a 
slightly different way: A statement of 
what a program does is far less useful 
than a statement of what the program 
is. The best example has been staring 
you in the face for years. Tell me first 
what a spreadsheet program does, and 
then when you've given up on that, 


Object Professional is a huge library 
of over 200 object types and 2000 
methods that 
will multiply 


your produc¬ 
tivity, Window 
object types let 
you use over¬ 
lapping and 
resizeable 
windows. The 
windows include 



Object Professional includes 
clear, comprehensive documentation, 
on-line help, full source code, 
technical support, and hot demo 
programs. Pay NO royalties. You'll 
get up to speed fast with OOP! 


m The range of objects is 
fantastic. Object Professional 
could literally save you 
man-years of effort. " 

Jeff Puntemann 


scrolling data 
entry screens ■ pick lists ■ menus 

■ file selection ■ printed forms 

■ help capability and more. 

Build your programs using 
proven data object types like stacks, 
linked lists, virtual arrays, and more. 
System-oriented routines provide 
swappable TSRs in only 6K of RAM, 
BMS management, and much more. 


Object Professional 1.0, 
only $150. 


of files. And theyTe compatible with 
Novell, 3Com, MS-NET, and others. 

You get ■ Fixed and variable 
length records a Two billion 
records per database ■ Up to 100 
indexes per index file m Fail-safe 
mode with journaling ■ Units for 
sorting, browsing, reindexing, and 
network control 

B-Tree Filer includes full source 
code, documentation, technical 
support, and you pay NO royalties. 


m B-Tree Filer... a well rounded , 
feature-rich approach to 


B-Tree databases." 

Computer Language, 1/90 


Write powerful network 
compatible databases faster and 
easier using B-Tree Filer 5.0. 

You'll have the Fastest, safest, most 
flexible databases — no rigid struc¬ 
ture, no TSR hassles, no running out 



B-Tree Filer 5.0, only 
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With network support, $175. 


Satisfaction guaranteed or your money back within 50 days. 
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about other shipping charges. OPro requires Turbo 5J. 
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tell me what a spreadsheet is. A spread¬ 
sheet does a whole host of things, hut 
what a spreadsheet is is a model of the 
classic accountant's paper ledger sheet. 
By now, the lights should I>e coming on. 

Collecting Stomps 

Seeing artifacts where you used to see 
actions is perhaps the most important 
skill to be learned in picking up OOP. 
Let's practice a little by identifying a 
program artifact and giving iL reality as 
an object. 

The artifact in question is the hum¬ 
ble moment, the point in time at which 
something happens. In certain kinds 
of programming, particularly business 
or financial programming, the time and 
date when a transaction happens can 
lie almost as important as the transac¬ 
tion itself. 

You've seen evidence of a moment 
in every DOS directory listing: The date 
and time when the file was last modi¬ 
fied. Every directory entry on a DOS 
disk has a time stamp and a date stamp, 
which are sometimes lumped together 
and simply called the time stamp. 

That's your artifact. To avoid confu¬ 
sion between its time and date compo¬ 
nents, (because it incorporates both) I 
call it a “when stamp/’ Any time you 
need to retain an expression of the 
moment that something happened in 
your program, you can create a when 
stamp object for it. 

Objects embody both data (the ob¬ 
ject's “state") and the actions necessary 
to manipulate that data. The data in a 
when stamp is straightforward: Some 
single, unambiguous expression of both 
clock time and calendar date, 

DOS has such an expression in its 
directory time and date stamps. It makes 
sense to use what DOS uses, (espe¬ 
cially when DOS can he made to do 
some of our work for us) so let's agree 
to keep our when stamp as DOS-com¬ 
patible as possible. The DOS time stamp 
and date stamp are both 16-bit words, 
so we can combine them into a single 
32-bit type in Object Pascal. The obvi¬ 
ous candidate is LongJnl, the 32-bit 
long integer type. 

Having the when stamp stored in a 
single numeric type carries the side 
benefit that two when stamps can be 
compared for time priority just by com¬ 
paring with the numeric greater than 
and less than operators. 

Time values are never negative, so 
you might hcgin to worry about the 
sign bit in a long integer, which is a 
signed type. As it happens, you will 
have to worry, but not for a very king 
time. (More on this later—nonethe¬ 
less, I still wish that Pascal had a Long- 
Word type.) 


Once we get the expression of time 
and date, we ll need methods to ma¬ 
nipulate it. But before you start think¬ 
ing about methods, get your data and 
its representation in order 

Encoding Time and Date, DOS-style 

Understanding how our When object 
works depends heavily on knowing 
how DOS encodes its time and date 
stamps in their 16-bit words. 

If we used neat decimal star dates like 
Captain Kirk, we'd be better off, but alas, 
a date is a set of three separate numeric 
quantities: Year, an ascending value 
that never repeats, month, a value that 
repeats regularly through a cycle of 12, 
and day, a value that repeats through 
a cycle of 28, 29, 30, or 31- This makes 
date arithmetic ugly unless the date is 
encoded as a single numeric value. 
The means is this: Express year, month, 
and date as binary quantities, then line 
them up in a single 16-bit word such 
that the year portion occupies the high- 
est-order bits, the month portion occu¬ 
pies the next-highest order bits, and 
I he day portion occupies the lowest- 
order bits. Done this way, two date 
stamps with different years will always 
compare correctly regardless of month 
or date; two stamps with identical years 
will always compare correctly on the 
basis of month, regardless of date, and 
so on. Which bits relate to year, month, 
and date is show n in Figure L 

Note that the year is encoded in a 
peculiar (and l think unfortunate) way: 
As an offset from the year 1980. 1980 is 
thus year 0, 1981 year 1, and so on. This 
allows the year to lie encoded in only a 
few bits, leaving plenty of room for the 
month and day in a 16-bit word. The 
downside is that you can’t encode your 


Figure 1: The IX)S date stamp format 


birthday as a time stamp, since you 
were probably born considerably prior 
to 1980, (I was, and have the hairline 
to prove it. ) Seriously, this limits the use 
of when stamps to things that occur in 
true calendar time while the computer 
is in use, and not to encode events that 
happened long ago, l was a little con¬ 
cerned about Lhe use of a signed type 
to hold the when stamp. At some point, 
the bit encoding of the time and date 
will set the high bit in the long integer, 
turning the value negative in the eyes 
of the run-time library. This blows any 
possibility of valid comparisons oul the 
window, because a later value that is 
negative will be seen as less (and hence 
earlier) than any positive stamp. How¬ 
ever, when l did the math 1 found that 
the stamp does not turn negative until 
December 31, 2043, by which time I 
will either lx? dead or perfecting zero-G 
lovemaking techniques out past the or¬ 
bit of Mars, 

17 Pounds of Kitty Litter in a 
16-pound Bag 

The DOS time stamp presents a prob¬ 
lem. No matter how you encode the 
hours, minutes, and seconds (and for¬ 
get hundredths here) you end up with 
a minimum of 17 bits: Six for minutes 
(0 - 59); six for seconds (0 - 59), and 
five for hours (0 - 23). 

You can usually cram 17 pounds of 
kitty litter into a 16-pound bag by shak¬ 
ing things around a little. Not so in the 
bit game — we pack ’em tight. Some¬ 
thing has to give a little, so what we 
do is ignore every other second. This 
cuts the number of bits required to 
encode seconds to five, and 16 bits will 
suddenly hold the stamp. See Figure 2. 

Note the way the stamp is encoded 
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Hours (0-23) Minutes (0-59) Seconds (0-59 DIV 2) 

Timestamp (Hours SHL 11) OR (Minutes SHL 5) OR (Seconds SHR 1); 


Figure 2: The DOS time stamp format 
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CWhydBASE 

programmers 

are excited! 



Build a multi-user, 

85 K, dBASE com¬ 
patible application 
using pulldown menus, 
popup windows, and 
data entry from 
pick lists. 

Portable 

When you are done, 
port your application 
to Unix, Microsoft 
Windows and OS/2 
without modifying a 
single line of code. 

Then watch as your 
application runs many 
times faster than corre¬ 
sponding dBASE, Clipper 
or Foxbase programs. 

Finally, you can keep 
all the profits after you 
have distributed unlimited 
numbers of your executable 
programs royalty free. 

Compatible 

Code Base 4 lets you access 
and modify the data, index 
and memo files of dBASE 
El, dBASE IV, or Clipper. 
Consquently, you can take 
advantage of dBASE com¬ 
patible tools such as R&R 
Relational Report Writer. 

Switch between Turbo C, 
Quick C, and Microsoft C. 
Take advantage of integrated 


development 

environments, sophisticated 
debuggers, and programs 
which compile and link 
in seconds. 

Learn Code Base 4 by 
consulting the comprehensive 
206 page user’s guide while 
interactively executing Code 
Base 4 routines from a 
learning utility. Then try 
example programs from the 
diskettes or the user’s guide. 
You will easily remember the 
Code Base 4 routines which 


correspond directly 
to familiar dBASE 
commands. 

Source Included 

As you become an 
expert Code Base 4 
user, you will find 
yourself examining the 
source code as you read 
about the internal 
operating principles 
of Code Base 4. 

Enjoy the benefits of 
complete dBASE func¬ 
tionality, including data 
entry, windows, menus, 
multiple index files per 
database, dBASE 
expression evaluation, 
fields, filters, relations, 
reindexing, and editing. 

Order Today 

Order Code Base 4 at $295 
and you will soon know why 
Sequiter Software Inc. and 
most software dealers are 
happy to give a 30 day 
money back guarantee!! 

Call (403) 439-8171 
Fax (403)433-7460 

SEQUITER HU 

SOFTWARE INC. I 
P.O. Box 5659, Station L 
Edmonton, Alberta 
Canada T6C4G1 
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KBHT4.0 

NEW TEXT EDITING POWER 



RO. Box 532, Storrs CT 06268 

(203)429-8402 

KEDIT Version 4 0 is available at 
$ 150; 05/2 version (irrcluties DOS 
version) >s 51 75. Add S3 shipping. 

MC P VISA, American Express 

KEDIT a a Utxtomm or itw Mahitield Soflwaie 
Group. Inc , JBM and l@M PC and PS/? an? trade- 
marks or international Business Machines 


KEDIT Is a powerful general purpose 
text editor for the IBM PC, PS/2, and 
compatibles that supports the editing 
of multiple ASCII files in multiple win¬ 
dows, sophisticated block move and 
copy operations, and reprogram¬ 
mability of the keyboard through 
keyboard macros. The latest version, 
KEDIT 4.0, provides these new features: 

■ EMS expanded memory support 

that allows editing of larger files. 

■ Selective line editing capabil¬ 
ity compatible with XEDIT's 'ALL' 
command, 

■ Enhanced programmability with 
improved interfaces to Mansfield's 
Personal REXX macro processor and 
a built-in REXX subset (KEXX). 

■ IBM VGA and Enhanced Keyboard 
support 

Proven in operation since 1983, KEDIT 
is unique In its support of many of the 
commands and features found in 
XEDIT, IBM's mainframe text editor for 
the VM/CMS system. Versions of KEDIT 
4.0 are available for both DOS and 
OS/2. 
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(continuedfrom page 138) 
in the figure: Whereas the hours and 
minutes values are shifted left to move 
them toward the high end of the word, 
the seconds value is shifted right by 
one bit, which bumps that bit ofF into 
Peoria and out of our hair. Truncating 
the seconds by half means that two 
events occurring less than two seconds 
apart will probably resolve to identical 
time stamps, depending on their syn¬ 
chronization with the system dock. You 
have to keep this in mind and avoid 
designing time stamps encoded this 
way into applications where stampable 
events happen in quick succession. Note 
also that your seconds value will al¬ 
ways be an even number, because the 
l bit that can make it odd is not stored 
in the stamp. 

To Represent or Calculate? 

At the heart of it, then, a When object 
consists of a long integer time/date 
stamp encoded as explained earlier. If 
you only needed to compare two stamps 
for time order, this would lie enough. 
However, you may need to access the 
seconds value separately, or the hours 
or months, and you may w r ant to dis¬ 
play time or date or both tn some gen¬ 
erally understood ASCII form. There 
are two ways to do this: 




■* K 'C ++ 10 


• Compile larger programs on 80286 or 80386. Translator 
runs in 80286 or 80386 protected mode; accesses all of 
memory from DOS. 

• Choose the compiler you prefer. Use INTEK C++ with any 
standard (K&R) C compiler. Library support is included for 
the six most popular DOS compilers. 80386 version supports 
80386 native C compilers from Meta Ware and Watcom. 

• Windows? No problem! Extended keyword compatibility 
allows you to compile for Microsoft Windows*. OS/2® native 
version coming soon! 

• Simplify your development environment Use INTEK C++ 
to cross-compile from Unix® 1 System V to DOS, so you can 
keep everything in one place. 


Authorized Deafer 

The Programmer’s Shop 

1-800-421-8006 


80286 DOS 

$249 

80386 DOS 

$495 

80386 Unix 

$495 

OS/2 

call 


iNT=K 

INTEGRATION 

TECHNOLOGIES 

1400 - 112th Avenue Sf. Suite 202 
Bellevue, Washington 98004 
(206) 4559935 FAX: 12061455-9934 
Usenet • uunel/inteiOBinfo 


INTEK C+ + ie derived from AT&T version 2.0 and ia HconsotJ from AT&T Windows 13. ,1 trademark qH Microsoft 
OS/? is a registered trademark ui IBM Unix is a registered Irademark of AT&T MeLaWare. Microsoft, and Watcom 
are trademarks of Their respective companies. 


* Add separate fields to the object to 
contain distinct hours, minutes, and 
seconds; and years, months, and days. 
Then recalculate and update those fields 
any time llie stamp itself changes. 

* Leave the time/date stamp as the sole 
data field in the object, and calculate 
any component value whenever a user 
of the object requests it. 

The first option buys speed at the ex¬ 
pense of space, and the second buys 
space at the expense of speed. Which 
do you use? Well, do you need more 
speed or space? 

I’m not just l^eing glib here. There’s 
no single answer You as the object’s 
designer have to keep track of your 
ow'n particular needs. I tend to write 
small programs, and I like fast ones, 
so my own first impulse is to throw 
memory at problems to make them 
faster. This is the design choice I made 
in implementing Lhe When object, as 
shown in Listing One, page 150. 

The When object has as its central 
data item the WhenStamp long integer 
field. It also has separate fields for year, 
month, day, day of week, hours, min¬ 
utes, and seconds. I added an ASCII 
representation of lime identical to that 
used in the DOS DIR command, as 
well as two ASCII date representations: 
One in the form yyfmm/dd, and the 
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other in the form “Thursday, June 29, 
1989 " This adds 94 bytes to the size 
of the object, but I did it with eyes 
open and decided that the benefits were 
worth the cost. There was one excep¬ 
tion, 1 chose not to provide a separate 
16-bit time and date stamp, as I had 
originally considered doing, because 
returning one half or the other of a 
long integer can be done without any 
significant calculation overhead, just by 
typecasting. Notice the definition of 
When l Inion , private to the unit; 


WhenUnion - 

RECORD 

TimePart: Word; 

DatePart: Word; 

END; 

WhenUnion is the same size as Long- 
In t, so you can use a value typecast to 
access either the time or date portion 
of the combined time/date stamp: 

TimeStamp := 

W h e nU nion( WbenSt a mp) .TiirtePa rt; 

It’s that easy, and saves you 4 bytes of 
memory at the cost of no calculation 
at all, Mike that sort of deal — kind of 
like insider trading in Silicon Valley. 

Choosing Your Methods 

Once you’ve decided what your object 
is, you can begin working out what it 
does; that is, design its suite of meth¬ 
ods. 1 wanted my when stamp object 
to be easily updated, so I provided 
numerous methods for changing the 
value of Lhe WhenStamp field. All the 
methods beginning with Put change 
the value of WhenStamp, and ail the 
methods beginning with Get return 
some value from the object. This is a 
good naming convention when design¬ 
ing objects, and 1 recommend it. The 
PutNow method is simple but extremely 
useful: It reads the current value of the 
PC's clock/calendar and applies the cur¬ 
rent time and date to the when stamp. 
The other Put methods alter the value 
of the when stamp by providing a new 
value for either the whole stamp 
(Put WhenStamp) or some component 
value of the stamp, such as year, month, 
or hours. How many such methods 
you build into an object depends on 
how you intend to use the object. My 
recommendation is to build more into 
the object than you may need, and 
reexamine the design some time down 
the road. You can always strip out what 
you haven't used . . . but you never 
know when some flash of insight will 
allow you to find a use for a method 
that you hadn't imagined when you 
originally wrote it! 
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Windows and OS/2 PM 
Programmers 


We want you to 
get this message 


Eikortls Control Paks ’ 1 are collections of 
graphical, high-level, reusable software 
objects designed for use by developers 
of Microsoft Windows 1 ’ 1 and OS/2 
Presentation Manager"’ software. Each 
royalty-free Control Pak contains three 
control classes, all supporting different 
visual styles. The Standard Pak 
includes Arrow, Palette, and Picture 
controls. The Tools Pak includes Ruler, 
Slider, and Toolbox controls. 
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ORDER TODAY! 
Call (415) 349-4664 


Eikon Systems. Inc. 
989 E. Hillsdale Blvd Suite 260 
Foster City, California, USA 94404 
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version 2.05 



Now your programs can have virtually unlimited heap space 
using expanded memory, extended memory and disk space. 
The Heap Expander's initialization code checks the system's 
resources and uses whatever is available. 



* U ses LIM -st anda rd expa n ded memory 
if present, 

* U ses AT-sty I e extended memory 1 1 
present. 

* $ wa p$ data to d i sk as need ed 


Libraries and Source Code for: 

• Turbo C 

* Microsoft C 4.0,5.0 and 5.1 


Requ ires an IB M PC, XT, AT, or close 
compatible with MS-DOS or PC-DOS version 
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MC/ViS A/C0D call 
1-800-248-1045x100 (US) 

1 -800-952-5560 x 100 (Idaho) 
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and handling. 
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Santa Cruz, CA 95063 
408 458-0690 
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STRUCIURED PROGRAMMING 


The Encapsulation Question 

The "pure 1 ' object-oriented languages 
such as Smalltalk and Actor both allow 
and enforce total encapsulation of an 
object’s data. You cannot directly refer¬ 
ence an object's data from outside the 
object or its descendants. Object Pascal 
allows total encapsulation, in that you 
can voluntarily provide a separate 
method to return the value of each 
field in the object. Nothing enforces 
this, however — you can reference any 
field in any object from anywhere in 
your program. Purists will say, “So 
what?” Give ’em the methods anyway, 


and say hands off the data. Such hard- 
nosedness gives you the considerable 
benefit of being able to change the 
actual representation of the data within 
an object without breaking the code 
that uses the object. For example, if I 
forbade direct references to the data 
inside When, i could come up with 
my own time stamp format that was 
truly universal and did not ignore the 
existence of years prior to 1980 as well 
as every other tick of the dock. 

If you needed to provide stamps for 
old financial records, birthdays, and 
such (as in a life insurance application) 


you’d be far better off going this route. 
My own need for time stamps, how¬ 
ever, was limited to stamping transac¬ 
tions occurring at the current moment, 
so I made the decision not to add the 
additional level of complication to 
When, I also wanted to retain full com¬ 
patibility with the DOS directory time 
and date stamps, and the easiest way 
to do that is simply to represent the 
time and date the same way DOS does. 
Given these assumptions, I created 
When to allow direct read access to all 
the data fields. 

Note that I said read. Writing directly 
to the fields is not a good idea, because 
all the fields but WhenStatnp are actu¬ 
ally component values of WbenStamp, 
and if you were to change the Month 
field without changing WhenStatnp, the 
two would be “out of sync." The Put 
methods were designed so that chang¬ 
ing any part of the time stamp recalcu¬ 
lates all component values relating to 
that part of the time stamp. For example, 
changing the date half of the when stamp 
recalculates the Year ; Month , Day, Day- 
0/Week DateString, and LongDateString 
fields, without affecting Hours, Minutes, 
Seconds, or TimeString, 

You need to be aware of such de¬ 
pendencies when deciding how to allow 
updating of an object's data. Calculating 
component values from a master field 
such as WhenStamp whenever they are 
needed avoids problems like this, if you 
can tolerate the loss of performance. 

Private Parts 

For reasons unknown, many newcom¬ 
ers to OOP gel the notion in their nog¬ 
gins that all of an object’s processing 
must be confined to its methods, and 
that while methods can call one an¬ 
other, methods somehow cannot call 
other procedures and functions unre¬ 
lated to the object. Not true! A method 
can call any routine within its scope, 
just as any nonmethod procedure or 
function can. Furthermore, there is no 
way to declare a "private" method in 
Object Pascal. A private method would 
be one that could be called by other 
methods within the object, but that 
could not be accessed from outside the 
object. If there is any private process¬ 
ing to be done by an object, you can 
do what I’ve done with When and place 
the object definition in a unit — with 
private procedures and functions fully 
declared and defined within the im¬ 
plementation section. Such procedures 
and functions may be called by the 
object’s methods but are not available 
to anyone outside the unit itself. Simi¬ 
larly, the Month Tags and Day Tags con¬ 
stants exist for the convenience of the 
object and are not needed by users of 


Drawbridge 



Drawbridge for: 

MetaWINDOW. $189 

Borland BGI .... $89 

Microsoft graphics library .. $89 


Reduce graphics 
development time with 
Drawbridge-the source 
code generating 
graphics editor. 

★ Increases productivity 

★ Object-oriented editing 

★ Source code generation 
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★ Available for C or Pascal 


Chatterbox 


Create a graphical user 
interface quickly and easily 
with the Chatterbox 
interface library. 
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the object, so I've declared them pri¬ 
vately, within the implementation sec¬ 
tion. Ditto with When Union. As long 
as you provide functions to return sepa¬ 
rate 16-bit values for the time stamp 
and date stamp portions of the when 
stamp (as l did with GetTimeStamp and 
GetDateStamp) t there’s no need to give 
the user the WhenUnion definition. Half 
the battle of programming is masking 
complexity, so keep an object’s private 
parts under a bushel basket where they 
won't be stepped on or misused by the 
ignorant and the unwary. 

One of the private routines is a day-of- 
the-week calculator using an algorithm 
called "Zeller's Congruence." Fve had 
this routine in my files for so long 1 no 
longer remember who coded it up and 
gave it to me, and l categorically do 
not understand how it works . . . but it 
does work. 

Homework Assignments 

That's how I went about designing a 
very simple object. To make sure it 
sinks in r do the following things for 
practice: 

* Recode the When object such that the 
only data field is the long integer When- 
Stampi with all other component values 
and alternate representations calculated 
as they are needed, by new Get meth¬ 
ods. This shouldn't involve much new 
code at all, but will involve moving 
existing code around a lot. While you' re 
at it, you might add a simple function 
to return the full long integer value of 
WhenStamp, giving you total encapsu¬ 
lation. You might like this more corn- 
pact version of When more than mine. 
So be it. I'm not you. (And 1 suspect 
we both should lx? glad. . . .) 

* Write new p methods to add or sub¬ 
tract specific values from the when 
stamp. You mighL want to create a when 
stamp containing a value exactly 30 
days from right now', and then monitor 
that stamp over the coming month to 
ensure that something necessary' hap¬ 
pens at that moment. This requires a 
way of adding 30 days to the long 
integer WhenStamp value. Its fairly easy 
,. . do it! 

Object Design Recap 

To summarize: 

An object is an artifact, not an action. 
Look at the way the universe is broken 
down into components, and learn to 
thi nk of your programs as built of com¬ 
ponent pails in much that same way. 

Once you’ve identified such a soft¬ 
ware artifact, decide how to represent 
its data first. Only once you have the 
data design down should you begin to 
ponder what methods it needs to serve 


that data. Remember, Data is Boss in 
object land. 

It's possible and often desirable to 
disallow any direct access to an ob¬ 
ject's data. This frees you to change the 
way the data is stored within the object 
without breaking code that uses the 
object. Remember, however, that this 
can add significant performance handi¬ 
caps to code that uses your objects. 
Keep the tradeoffs in mind, but (as the 
cricket kept saying) always let your 
conscience be your guide. 

Also remember that this is just a first 
lesson. We haven't even begun to ad¬ 
dress the issues presented by inheri¬ 
tance or, lord knows, polymorphism. 
All in good time. 

Have You Seen this Book? 

Maybe you all can help me out a little. 
My newest book. Assembly Language 
From Square One t (Scott, Fores man & 
Company ) has been off the presses for 
some time, and I have yet to see it in 
any store. If you have seen it any¬ 
where, drop me a postcard at DDJ and 
tell me what store is carping it. The 
computer book distribution system 
seems to be breaking down in recent 
months, much as it did in 1984. Huge 
numbers of titles, most fit only to hang 
in a Tennessee outhouse, have been 
pouring into the retail channel lately, 
and it's gotten me (and some other 
well-known authors) more than a little 
worried. We may not be able to change 
the system, but we’d at very least like 
to know what books are going where. 

Thanks. 

Write to Jeff Duntemann on MCI Mail 
as fOuntemann, or on CompuServe to 
10 76117,1426. 

Availability 

All source code is available on a single 
disk and online. To order the disk, 
send $14.95 (Calif, residents add sales 
tax) to Dr Dobbs Journal, 501 Galves¬ 
ton Dr, Redwood City, CA 94063, or 
call 800-356-2002 (from inside Calif.) 
or 800-533-4372 (from outside Calif.). 
Please specify the issue number and 
format (MS-DOS, Macintosh, Kay pro). 
Source code is also available online 
through the DDJ Forum on Compu¬ 
Serve (type GO DDJ). The DDJ Listing 
Service (603-882-1599) supports 300/ 
1200/2400 baud, 8-data bits, no parity, 
1-stop bit. Press SPACEBAR when the 
system answers, type: listings (lower¬ 
case) at the log-in prompt. 

DDJ 

(Listings begin on page 150.) 

Vote for your favorite feature/arttcle. 

Circle Reader Service No, 11. 


Multitasking 

for the IBM-PC/XT/A T 
with 

Multidos Plus 
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multitasking environment. Check these 
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• Run up to 32 programs 
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under PC-DOS or MS-DOS. No 
need to learn a new operating 
system. 

• Use the compilers you already 
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assembly language. 
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run programs, change priority, 
check program status, and to 
abort/suspend/resume task 
execution. 

• Optional independent foreground 
and background displays. 

• Programmatic interface through 
fNT 15H for the following: 

* Intertask messaging to send, 
receive, check or wait on 63 
different message queues. 

* Task control by means of 
semaphores. Get, release, 
check, or wait on semaphores. 

* Change task priority. 

* Suspend task for specified 
interval, 

* Spawn and terminate external 
and internal tasks. 

* Di sabl e/e n abl e mu Iti task i ng, 


Requires: IBM PC/XT/AT or true done. MS-DOS 
(or PC-DOS) 2.0 or taler. Enough memory to hold 
Multidos Plus (64KB) and all your application 
programs. You may also reed 4 or 16KB of 
memory tef "hidden screens" tor each active task. 


$24.95 

$99.95 


wrih source code (written 
in Microsoft QuickC 2.00 and Assembler) 


To order call (800) 678-2141. FAX 
(508) 655-8860. For technical 

information and foreign orders call 
(508) 651-0091. Visa and Mastercard 
accepted. Or send check or money 
order (Drawn on U.S. banks only) to: 

Nanosoft 

13 Westfield Road 

Natick, MA 01760 

Add $2,00 for shipping & handling. 

Foreign orders add £5.00 for shipping & handling. 

GOD orders add additional £3.00 
Massachusetts shipments add 5% sales tax. 
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C PROGRAMMING 


Listing One (Text begins on page 127.) 


csort.h 


V 


♦define NOFLDS 5 /* maximum number of fields to sort 

♦ define MOETMEM 50000U /* most, memory for sort buffer 

♦ define LEASTMEC* 10240 /* least memory for sort buffer 


struct s_pm ( f* 

int rc_len; /* 

struct l 

int f_po$j /* 

int f_len; /* 

char ad; /* 

\ s_fld (HQFLD3J| /* 

Is 


sort parameters */ 
record length */ 

1st position of field [rel 1) */ 
length of field */ 
a = ascending; d » descending ‘/ 
one per field */ 


fclOSC E fpout); 
3ort_stat5if; 
free(buf!; 


static void usage(void) 

! 

print f ("\nusage: filesort f name len I pos length ad.. + )"); 
exit(1); 

I 

End Listing Two 


Listing Three 


Struct bp \ h one for each sequence in mergE buffer */ 


char *rc: /* -> record in merge buffet */ 

int rbuf; /* records left in buffer this sequence *f 

int rdsk; /* records left on disk this sequence *7 

)t 

int init_sort [struct sjjxm ’pms); /* Initialize the sort V 
void sort(char *rcd); ” /* Pass records to Sort */ 


char ’sort op(void!; /* Retrieve sorted records*/ 

void sort stats[void); /• Display sort statistics*/ 

End listing One 


Listing Two 

/* -— -filesort.e —— --—- */ 


fiodtule *stdicuh> 

♦ include <stdlib.h> 

♦include <$tripg.h> 

♦include "caort.h" 

/* sort a file; 

* cennnand line; filesort filename length ffl, 11, azl, ,■,*} 

* filename is the name of the input nle 

length is the length of a record 

* for each field; 

* fl is the field position relative to 1 

* 11 is the field Lengths 

* azl = A = ascending* D = descending 


Static Struct a prm sp; 

Static void usage(void); 

void main[int argc, char *argv!]| 

( 

int i, fct * O'* 

FILE *fpm, *fpout? 

char 'buf; 

char £i1ecame f 64]; 

/*--— get the file name from the command line —-— */ 

if [aigc— ? 1> 

5trcpy(filename, argv^+jlj); 

else 

usage[l ; 

t* - -get the record Length from the command line-V 

if Urge-- > 1] 

sp + rc_len * atoi (srgv+4 [1]} ,■ 

else 

usage(j f 

f* — -— get field definitions from the command line V 

do [ 

if (argc < 4) 
usage (\ ; 

sp,s_fId[fct].f_po3 * atoi(argvH +'fl|); 
sp.s_fLdjfctj.f_len = atoi(argv++|); 
sp.s_fld[£ct],ad = *argv-H-[lJ; 
argc -*■ 1; 
fct++; 

} while (argc > 1); 

printf("\nFile: is, length*, filename, 3p,re_l*n>; 
fox (i =0; r < fct; i++! 

printf P\nField %d: position id, length \d r Is”, 
l+l f 

ap.s_fldli].f_pos, 
ap*9_fldli]*f lefi* 

ap,s^fld|i],ad = 'd p ? 

"descending' : "ascending"!; 

if ((fpin = Eopen(filename r "rb 1 *!) -** NULL] [ 
printf("\nlnput file not found"); 
exit U); 

if ({buf ” malloc (sp.xc_len) | -- NULL :! 

init_sort [iafJJ = -1] j 
printf("\nlnsufficient memory to sort"); 
fexit (1}; 

/* • - sort the input records -—- */ 

while (freadtbuf* sp r rc_len, 1* fpin) — 1) 
sort (buf |; 
sort[NULLS! 
fclcse[fpin]; 

f* - retrieve the sorted output records —-— */ 

fpout - fopen("SORTED.DAT", "uh"l; 
while [ (buf = $ort__ap(] l (=■ NULL! 

fwritelbuf, spTrc_len, l, fpout]; 


♦include cstdio,h> 
♦include <stdiib.h> 
♦include <strlng,h> 
♦ include "csortrh 11 


static atruet s_prm ‘sp; /* structure of sort parameters */ 
Static unsigned tot red; /* total records sorted */ 
static int no_aeq; /* counts sequences */ 
static int nD_eeql; 

static unsigned bspace; /* availabie buffer space '/ 
static int needs; /■ I of records in sort buffer */ 
Static tnt nrcdsl ; 

static char *bf r *b£l; /* points to sort buffer */ 
static int inbf; /* variable records iti sort buffer */ 
static char **sptr; /* -> array of buffer pointers */ 
static char ,t init_sptr; /* po-inter to appropriated buffer */ 
static int rcds_seq; /* reds / sequence in merge buffer *7 
static FILE *fpl, *fp2; /* sort work file fds */ 
static char fdname[!&]* /* sort work name J */ 
static char f2namefl5]; /* sort work na®£ "7 


static int c«np[char *’a, char **b|i; 
static char ‘apprjnem(unsigned *h]r 
static FILE ‘-wopen(char *nsnie, int nl; 
stat1c void dumpbuff[void}; 
static void merge(void); 
static Void prep_nH?rge (void) , 

/* —“““ initialize sort global variables—-— - */ 

int inn_$ort (struct s_prn *prmsj 

( 

Sp = pHU; 

if ( (bf - apprjnesH6bspace!) != MULL) | 

nrcdsl = nrtds = bspace / [5p~>rn:_len t siaeof[char *)); 
init sptr = bf; 
sptr - (char **) bf; 
bf needs * siieof(char *); 

£pl = f P 2 - NULL; 

tot red - no_seq = inbf = Q* 

return Of 

) 

else 

return -1; 


/*-—” Function to accept records to sort -*■-*/ 

void sort(char *s_rcdj 

if (inbf ** nreds] ( /* if the sort butter is tuli */ 

qsort(init_sptr, inbf, 

sizeof [char *), comp); 

if (s tcd[ ( /‘if there are more records to sort 4 / 
dumpbuff(); / p dump the buffer to a sort work file*/ 
no_seq+t; /* count the sorted sequences V 

J 

t 

if t«_xcd (= MULL) l 

/* - this is a record to sort 4 / 

totrcd +*7 

/* — put the red addr in the pointer array -—— */ 

‘sptr = Of + inbf * sp’>rc_len; 
inbf+»; 

/*-tn-Tve the red to the buffer — */ 

memmovei^sptr, s red, ap->rc_len}/ 

sptr++; /* point to next array entry */ 

else ( /* null pointer means no sore tods */ 

if (mbf) ( /* any records in the buffer? */ 

gsort (init_sptr, inbf, 

sizeof [char *], compl; 

If (no_seg! /* if this isn't the only sequence 4 / 

dumpbufiE); /* dun^i the buffer to a work file V 
no_seqt*,f /* count the sequence */ 

\ 

no_seqI * no^seq; 

if (no_seq >1] /‘if there is more than l sequence */ 
prep merge[); /* prepare for the merge *f 

) 


/w --—prepare 
static void pxep_intfrge {) 

( 


int L; 

Struct bp *rr; 
unsigned n_bfsz; 


for the merge 


memsettimt_3ptr, '\0', bspace]; 

/* ---— merge buffer size- */ 


(co n tinued on page 146) 
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Listing Three (Listing continued , text begins on page 127.) 

n^bfsi = bspace - no_seq * siaeof(struct bp)r 

/"* --# rcds/seq in merge buffer-V 

reds^seq - n_bfsz / no_seq / sp->rc_len; 
if (rcda_seq <2} f 

/* ---- more sequence blocks than will fit in buffer, 
merge down- *f 

fp2 =* wopen (f^naine, 2) ; /* open a sort work file */ 

while (rcds_seq < 2} { 


FILE *hd? 

merge (); /* binary merge */ 

hd = fpl; /■ swap fds *f 

fpl - fp2; 
fp2 - hd; 
nrcdg * = 2} 

/* —— adjust number of sequences --+/ 

no^seq = (na^seq +1} / 2; 


n_Efsz * bspace - no_seq * sizeof(struct bp); 
rods seq = a_bfsz f no_seq / sp”>rc_len; 

t 

bfl - init_5ptr; 
rr = {struct bp ») init_sptr; 
bfl +“ nc_saq * sueof [struct bp); 
bf - bfl 

f* fill the merge buffer with records from all sequences */ 

for (i ™ Or i < nO_seq; i+t) ( 

fsaeMfpi, (long) i 1 ((long] nrcds * ap->rc_len), 
$EEK_3ET }t 

/* - read them all at once -- V 

fread(bfl, rcdsseq * sp->rc_len, 1, fpl}; 
rr->rC = bfl; 

t* — the last seq has fewer rede than the rest - */ 

If (i == no_seq-U | 

if (totred 1 nrcds > rcd4_aeq) \ 

n->rbuf - rcdi3_3eq; 
ir->rdsk =■ (totred nrcds) - rcds_seq; 

) 

else t 

rr~>rbuf = totred \ nrcds; 
ci->rdsk - 0; 

I 

I 

else | 

rr->rbuf = reds^seq; 
rr->idsk - nrcds - rcdsseq; 

] 

rr++; 

bfl rcds_seq * sp->rc_lan; 

\ 

\ 
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/* ——- the work file down 

This is a binary merge of records from sequences 


in fpl Into fp2. -*/ 

static void merge () 

t 

int i; 

int needy, need*; /* true - need a red from (x/yt */ 

int icnt, yent; /* I reds left each sequence V 

int x r y; /* sequence counters V 

long adx, ady; /'* sequence record disk addresses */ 


/* — the two sets of sequences are x and y ——- ♦/ 

fseek[fpZ, 0L, SEEK_3ET); 

for (i » 0; i < no_seq; i +~ 2} [ 

K = y = i; 
y++; 
yent = 

y »» no_seq H s y == so seq - 1 ? 
totred 5 hreds : nrcds; 
xent * y no_seq ? totred 6 nrcds ; nrcds; 
adx = (long) b * (Long) nrcds * 3p->rc__len; 
ady ® adx * {long} nrcds * ap ->rc_len” 
needy = need* = 1; 
while (xent !! yent) ( 

if (need* Afi xcnc) ( /* need a red from x? */ 

l seek (fpl, adx, SERKjETt? 
adx (long) sp->rc_len; 
fread[init_sptr, 3p->rc_len, 1, fpl]; 
needx - 0; 

\ 

if [needy 4b yent) t /* need a red from y? */ 
fseektfpl, ady, SEEK_SET]; 
ady 4= ap->rc_ien; 

fread(init_sptr+sp->rc_len ( sp->rc_ien, l, fpl); 
needy = D; 

I 

if {xent : ; yctitj I /* if anything is left 

/* - compare the two sequences — */ 

if fiyent :I (xent ^6 

(comp(*init_sptr, tinit sptr t sp->rc len]) 
< 0}) j 

/* -—— record from x rg lower —— */ 
fat rite (ialt_apt t, sp->rc Len, 1, f P 2); 
--xent; 
needx « 1; 

f 

else rf (yent) [ /* record from y is lower V 

fwritfl(init_spcr4sp->rc_len, 

sp~>rc_left, 1. fp2>; 

—yent; 
needy - 1; 
l 


-Pucnp th e 30rE byfter to the work file-— — */ 

static void dumpbu£(() 

t 

int i; 

if (fpl ~ NULL) 

fpl - wope n{£ d name * 1); 
sptr = loh^r ■*) init sptr; 
for (i - 0; i * rnbf; i*+j ( 

fwrite(*{sptr t i) r *p->rc_len, 1, fpl}; 

*(aptr * i) = 0; 

J 

inbf = 0; 

1 

f* —--— jjpen a sort work file----- */ 

static FILE 'wopeq{char ''narae, int n) 

l 

FJT,E *fp; 

strepy (name, p sort work. DO 0 11 ] f 
name|strlen(name] - 1] +- n; 
if ( (fp = C open (name, “wb4"')) = HULL} ( 
printf("\rvFile error”); 
exit(i|f 

return fp, 1 

) 

t *-— Function to get. sorted records —-—— 

This is called to get sorted records after the sort is done. 

It returns pointers to each sorted record. 

Each call to It returns one record. 

When there are no more records, it returns NULL. - */ 

Char *gprt_op|) 

l 

int j - 0; 
int nrd f 1, k, In¬ 
struct bp ‘rr; 

Static int rl = 0; 
char 'ten; 
long ad, tr; 

sptr = |char **) init_sptr; 
if (no_seq < 2] ( 

/* with only 1 sequence, no merge has been done — */ 
if (rl totred) \ 
free(init_sptr}; 
fpl = fp2 - HULL; 
fl - D.f 
return PTULL; 

] 

return *{sptr 4 rl++); 

1 


iAA 
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rr = (struct bp *] inlt sptr; 
for |i 1 di i < noseq; 1++) 

j !- (rr 4 i)->rbuf : (ir 4 ijordsk; 

/* — j will be true if any sequence still has records - */ 
if (Fj| [ 

fcloseffpl|; /* none left */ 

remove [ fklaane) ; 
if Ifp2) ( 
fclos0(fp2); 
remove (fZnatne) i 

) 

fteeiinit sptr); 
fpl - fp2"- NULL; 
ri = 0; 
return NULL; 

J 

k - D; 

/*■ --- find cbe sequence in the merge buffer 

with the lowest record */ 
for {i - Q; i < no^aeq; i++) 

k * |}cnmp( «(rr ■» k)->re, M*r * i)->re) < D) 1 It : if; 

f* k is an integer sequence number that offsets to the 
sequence with the lowest record-*/ 

(rr + k)->rbuf—; /* decrement the red counter */ 

rtn - (rr +■ k]->rc; /■ set the return painter V 

(rr + k)->rc 4- sp->re_!en; 
if 1(rr 4 k]->rbuf = fl) I 

/* ---- the sequence gat empty - */ 

/* - so get some more if there ere any — */ 

rtn = bf 4 k * reds seq * sp->re_len; 
memniove(rtn h (rr * E)~>re - sp->rc_len r 3p->ic_len) ; 

(rt 4 k)->rc = rtn 4 sp->rc_len.,' 
if ((rr 4 k)->rd$k ’= 0] } 

L * Urcds_seq-1) < (rr>k)->rd&k) 7 
rcdB_eeq-l : (rr4-k)->rdsk,; 
nrd - k — ne_seq - 1 7 totred % nreds i nreds; 
tr = (long) ((Sc * nreds + (nrd - (rr 4- k)->rdskn)t 
ad - tr * sp->rc_len; 
fsMkffpl, ad, 3E£K_£ET)r 

freadSrtn + sp-^re Ten, 1 * ap->rc_len, l r fpl); 

(rr + k] ->rbu£ - I? 

(n f k}->rdek -= 1; 

else 

memset((rr4 k)-5-rc, 127, sp->rc_Ien)j 


/* -—- Function to display sort stats- * / 

void softestats() 

printf C l \n\n\ohecotd Length = fcd",sp->rc ieo]; 
printf ( lf \n%d records sorted", totred) ; 
print f("\n^d sequence",no_s eql1; 
if (no^seql != 1) 
putchar('s r ]; 

print f {"\n%ti characters of sort buffer", bspacej; 
prifJtfr'\nW records per buffer\n\n",nreds 1] ; 


/*-appropriate available memory --*/ 

static char *appr mem(unsigned *h) 

I 

char 'buff « NULL; 

*h “ (unsigned) HQSTKEK + 1024; 
while (buff — NULL £6 *h > LfASTMEK} [ 
*b -= 1024; 
buff * mallocf*h); 

1 

return buff; 


f - ► — compare function for sorting, merging - *f 

static int comp (char **», char * 4 b) 

int 1, k; 

if {**a =127 ;; **b = 127} 

return (int} w *a - (int) **b; 
for (i = 0; i < NOFLDSj i++| ( 

if (sp->s_fld[i].f_pos “ 0) 
break; 

if ((k = atrnioipf [ fr a)+sp->s_£ld[i] r f_poa - 1, 

(*b)tsF->s^fld[i] ,f_pqa - 1, 
sp->rc_len>) E= 0) 

retyrn (sp-?s_fld[it ,ad == r d' l }?-k:k; 

I 

return 0; 


return rtn; 

I 





PANEL / 



Pius n/ a 

Screen Generator and User Interface Library for *C* 



_ 

PANEL Plus II features: Interactive screen design editor 

* C code generator ■ extensive library of user-interface 
functions * pop-up fields /windows * multiple-line fields 

* horizontal /vertical scrolling regions * scroll bar/mouse 
support * help boxes * custom validation * pull-down 
menus * complete library source Included * support for 
popular graphics libraries * OS/2 DLL ■ no royalties. 





Just released. Utility Source Option including source 
code for the screen layout editor and code generators, 
which allows PANEL Pius II to be ported to any suitable 
development platform. This gives you the freedom to 
choose and switch your development environment, with 
total screen and source code compatibilty . Also now 
supported: Microsoft FORTRAN under DOS and OS/2 
(the DOS version requires the MS-C run-time library). 



. 


Panel Pius II can now run on any system with ‘C (but 
block-mode terminals are not supported]. Cost per user: 
$495 (including 640-pagc manual]. Please call for 
quantity pricing, full version list, and free demo disk. 



Roundhil! Computer Systems Limited 

1964 Rich (on Drive. Wheaton IL 60167 

Telephone: (708) 690 3737 • Fax: {708) 665 9S41 • BIX: jb/n roundhfff 

UK 3 lead Office rt)B 14 Murfborougb, Wiltshire SN8 1LG * Tel 0672 S4535 * Fax: 0672 8452b 



End Listings 


AccSys” for 



■ Set of C libraries for easy access 
to dBASE data and index files. 

■ No need to concern yourself with 
internal files format. 

■ Increased performance shortens 
processing time. 

■ Total control over data memo, MDX 
and NDX index files. 

■ Network and single-user versions available. 

Copio International Ltd. 

1964 Richton Drive, Wheaton, Illinois 60187 
708/ 682-8898 FAX: 708/665-9841 

Instant info, via FaxFacts: 617/740-0025 #1625 007 












































&T BOOKS 



mi books 


THE DEFINITIVE REFERENCE 

FOR LANS 

AND USING NETWARE 



Mtok It tamp* ■* M* tor 


BUILDING 

LOCAL 

AREA 

NETWORKS 

WHti MoveH a 
MulWwa 


Building Local 
Area Networks 
with Novell’s 
Netware 


by Patrick H. Corrigan and 
Aiding Guy 

From the basic components to complete 
network installation, here is the practical 
guide that PC system integrators will 
need to build and implement PC LANs. 
The specifics of building and maintain¬ 
ing PC LANs, including hardware con¬ 
figurations, software development, ca¬ 
bling, selection criteria, installation, ami 
managmement are described in a clear 
“how-to" manner with numerous illus¬ 
trations and sample IAN managmem 
forms. Building Local Area Networks 
gives particular emphasis to Novell's' 
NetWare*, Version 2,1* Additional topics 
covered include the OS/2 LAN manager, 
TOPS, Banyan VINKS, internetworking, 
host computer gatways, and multisystem 
neworks that link PCs, Apples, and 
mainframes* Optional disk containing 
valuable utilities also available. 



Blueprint of a 

LAN 


by Craig Cbaiken 

Blueprint of a LAN provides a ha nds-on 
introduction to microcomputer net¬ 
works. For programmers, numerous 
valuable programming techniques are 
detailed. Network administrators will 
learn how to build and install IAN com¬ 
munication cables, configure and trou¬ 
bleshoot network hardware and soft¬ 
ware, and provide continuing support to 
users. Included are a very inexpensive 
zero-slot, star topology network, remote 
primer and file sharing, remote com¬ 
mand execution, electronic mail, parallel 
processing support, and 8086 assembly 
language source code that will help you 
build an inexpensive to install, local area 
network* An optional disk containing all 
source code is available. 

Book & Disk 

Hem #066-4 $39-95 

Book only 

Hem #052-4 $29-95 



NetWare® 

Supervisor’s 

Guide 


by John T. McCann with 
Adam T. Ruef and Steven L. 
Guengerich of Business 
Systems Group, Inc. 

Whether you are in charge of a single 
NetWare 0 * IAN with a small number of 
workstations or oversee a multi-site in¬ 
ternetwork ed NetWare® WAN, Net¬ 
Ware H Supervisor’s Guide will prove 
to be a valuable reference. It is a defini¬ 
tive reference on how to use NetWare 
from a practical, hands-on perspective, 
and is a source of useful technical infor¬ 
mation that supplements the manuals, 
including NetWare 386. 

Book only 

Item #111 3 $29-95 


Book & Disk 
Item #025-7 
Book only 
Item #010-9 


3 


$39.95 

$29.95 


CALL TOLL FREE 1-800-533-4372 
(In CA, call 1 -800-356-2002) 
or FAX 1o(415)366-1685 


♦Prices subject to change without notice. 




























NetWare® User’s Guide 


by Edward Liebing 

This complete task-oriented reference introduces users to 
NetWare® and guides them through the basics of Netware® 
menu-driven utilities and command lines utilities. Each utility 
is illustrated, thus providing a visual frame of reference. You 
will find general information about the utilities, then specific 
procedures to perform the task in mind. Utilities discussed 
include NetWare® v2.1 through v2.!5. For advanced users, a 
workstation troubleshooting section is included, describing the 
errors that occur. Two appendixes, describing briefly the serv¬ 
ices available in each NetWare® 1 menu or command line utility 
are also included, NetWare® User's Guide is endorsed by 
Novell®, Inc. 

Book only 

Item #071-0 $24.95 



LAN 

Troubleshooting 

Handbook 


by Mark A. Miller 

This book is specifically for those users and administrators who 
need to identify problems and maintain a LAN that is already 
installed. Topics include LAN standards, the OSl model, net¬ 
work documentation, LAN test equipment, cable system test¬ 
ing. and more. Addressed are specific issues associated with 
troubleshooting the four mast popular LAN architectures: 
ARC NET, Token Ring, Ethernet, and StarLAN. Each are closely 
examined to pinpoint the problems unique to its design and the 
hardware. Handy checklists to assist in solving each architec¬ 
ture's unique network difficulties are also included. Optional 
disk containing all source code also available. 


Book & Disk 
Item #056-7 
Book only 
Item #054-0 


$39-95 

$29.95 


|!o ORDER: Return this coupon with your payment to M&T Books, 501 Galveston Drive, Redwood City, 
CA 94063-4728. Or CALL TOLL FREE 1-800-533-4372. (In CA call 1-800-356-2002). 

□Please send me what I have listed below: 


Item # 


Description 



Subtotal 

Less any discount_ % 

CA residents add sales tax 
Shipping and handling add 
*53-50 per item 


MST BOOKS 


Total 


Price 


□Check enclosed. Make payable to M&T Books. 
Charge my: dVisa EHM/C dAmEx 

Card No. _Exp.Date_ 

Signature_ 


Name. 


Address . 


City. 


State 


.Zip. 


Order by FAX (415) 366-1685 
* FREE SHIPPING ON ORDERS OF 3 BOOKS 
OR MORE! 


3248 


SPECIAL OFFER: If you purchase 3 to 5 copies, DEDUCT 10% off the subtotal, 15% 


for 6 to 10 copies, and 20% for 11 or more copies! 




M&T BOOK 














































Sjjumill PK06SAMMIH6 


Listing One (Text begins on page 135J 

! —---------- 

( TlHtDATE 

I 

( A Time-and-date stamp object for Turbo Pascal 5.5 

I 

( by Jeff Puiitwurvn 

( Last update 12/23/85 

( 

( NOTE: This unit should be good until December 31* 

( .20*3, when the long integer time/date stamp turns 
( negative* however, the Zeller '5 Congruence 
( algorithm shown here fails at the end of the 20 th 
■I century, 1 should be able to figure out the ft* 

( by then... 

UNIT TimeDate; 

INTERFACE 
USES DOS,' 

TYPE 

Strmg5 * STRING [ 5]; 

5tring20 « STRING[20]; 

String50 - STRING[50]; 

When " 

OBJECT 

WhenStamp j Lgngint? 

TimeString ; StringS; 

HOuts, HinuteS,Seconds : Ward; 

DateString : String20; 

LongDateString : String 50; 

Year, Month. Day ; word; 

DayDfNeak : Integer; 

FUNCTION GetTimestamp : word; 

FUNCTION GetOateStamp : Word; 

PROCEDURE putNow; 

PROCEDURE PutHhenStamp(NewWhen 
PROCEDURE PutTimeStamp(NewStamp : Word}; 

PROCEDURE PutDateStamo(NewStamp 3 Word); 

PROCEDURE PutNewDate(NewYeuE,NewHanth,^wDay : Nerd); 
PROCEDURE Pu t NewTime < NewMou r s.Ne vtti nut es.NewSeoonds ; Word}; 
END; 


IMPLEMENTATION 

[ Keep in mind that all this stuff Is PRIVATE to the unit! | 

CONST 

MonthTags 1 ARRAY |1,,12] of String5 = 

('January' , 'February' 4 'March' , 1 April' , 'Kay' * 'June' , 'July* , 

'August'. * 1 September', 'October'. 1 November','December']; 

DayTags 3 ARRAY |Q*.«J OF String* - 

£’Sunday',*Monday','Tuesday', ‘Wednesday', 

" Thursday*, 1 Friday*,'Saturday*]; 

TYPE 

Whentfnion = 

RECORD 

TimePart ; Word; 

DatePart 3 Word; 

END; 

VAR 

Tempi : String50; 

Dummy 3 Word; 

t Soma utility routines private to this unit: | 

FUNCTION CalcTimeStamp(Hours,Minutea,Seconds j Word) ; Word; 

BEGIN 

CfllcTimeStamp :=> (Hours SHL 11} QR (Minutes 5KL 5} or (Seconds SHR 1); 
END; 


FUNCTION CaieQsteSt*^ (Year, Month* Day : Word) 1 Word; 

BEGIN 

CaltDatestamp {(Tear - 1880) SHL 9} QR (Month SHL 5} OR Day; 

END; 


PROCEDURE CalcTlmeSt ring(VAR TimeString : String*; 

Hours.Minutes,Seconds 3 Word); 

VAR 

Temp i, Te.rap2 : StringS; 

AMPM : Char; 

I : Integer; 

BEGIN 

I :" Hours; 

IF Hours = 0 THEN t := 12; ( "{t M hours - 12am I 

IF Hours > 12 THEN I Hours - 12; 

IF Hours > U THEN AMPH := 'p' ELSE AMPM *a*: 

Str (1:2*Tempi); Str(Minutes,Temp2); 

IF Length[Temp2) < 2 THEN Temp2 -.= *Q' + Temp2; 
TimeString : = Tempi + ';* 4 Tepp2 ♦ AMPH; 

END; 


PROCEDURE CaicDateString (VAR DateString i 5trmg2D; 

Year* Month* Day : Word); 

BEGIN 

Str(Month* DateString); 


Str[Day,Tempi}; 

DateStnng DateString + */ r * Tempi; 

Str [Year* Tempi J ; 

DateString DateString + '/* * Copy(Tempi*3*2}; 
END; 


PROCEDURE CsicLongDateString(VAR LongdateString : StrlngSO; 

Year,Month* Date*DayQfWeek : Word}; 

VAR 

Tempi : Strings; 

BEGIN 

LongDateString := DayTags|DayQfWeek] 4 *, '; 

Str(Date,Tempi|; 

LongDateString :* LongDateString + 

MonthTags[Month! * ‘ ' t Temp] 4 % *; 

Str (Year, Terapl) ; 

LongDateString LongDateString 4 Tempi; 

END; 


( This calculates a day of the week figure, where CHSunday, 1-Monday, } 
( and so oil, given the year, month* and day. The year may be passed } 

£ as either "198*" or -B9* but ‘not* as 198Q-relfltive, or "9".’ Also \ 

[ note that this particular algorithm turns into a pumpkin in 2QQQ. \ 

\ BTH, don*t ask me to explain how this craiy thing works. I haven't [ 

£ the foggiest notion. If I ever meet Mr- Zeller* I'll ask him. 

FUNCTION CalcDayOfWeektYear,Month,Day : Word) : Integer; 

VAR 

Century, Leftovers, Holder : Integer; 

BEGIN 

I First test for error conditions on input values: } 

IF (Year tf 0} OR 

(Month <; U OR (Month > 12} OH 
(Day < M OR (Day > 31) THEN 

CalcDayOfWeek ;= -1 f Return -1 to indicate an error ] 

ELSE 

( Do the Zeller's Congruence calculation; } 

BEGIN 

IF Year < 108 THEN Inc(Year*IBGQI; 

Dec(Month,2}; 

IF (Month < U OR (Month > 10} THEN 
BEGIN 

Dec (Year, 1) ; 

Inc (Month, 12) *- 
END; 

Century := Year Biv 100? 

Leftovers :* Year HM? 108; 

Holder (Truncdnt <2, fi * Month - 0,2)1 *■ Day * 

Leftovers * (Leftovers DIV 4] +■ 

(Century DIV 4 } - Century - Century) MUD 1; 

IF Holder < 0 THEN 
Inc(Holder*7}; 

CalcDayOfWeek := Holder; 

END; 

END; 


I Method implementations for type When: } 
......J 


( There will be many times when an individual date or time stamp will } 
r be much more useful than a combined time/dace stamp. These simple j 
1 function* return the appropriate half of the combined long integer \ 
[ time/date stamp without incurring any calculation overhead. It's ) 
[ done with a simple value typecast: 

FUNCTION When.GetTimeStamp : Word; 

BEGIN 

GetTuneStamp :=* Whenllnion (Whenstamp) .TimeP^rt? 

END; 


FUNCTION When,Get DateStamp : Ward: 

BEGIN 

GetDateSramp :* WhentInj.on(WhenJtaHtp) .DatePart; 
END; 


( To fill a When record with the current time and date as maintained ) 
I by the system clock, execute thia method: 

PROCEDURE When.PutNOw; 

BEGIN 

I Get current clock time. Note that we ignore hundredths figure: ] 
■GetTime (Hours, Minutes, Seconds, Dunmy}; 

I Calculate a new time Stamp and update -object fields: | 

PutTuaeStany (CalcTimeStamp (Hours, Minutes* Seconds) } ; 

GetDate(Year,Month,Day,Dummy}; | Get current clock date [ 

I Calculate a new date stamp and update object fields: I 
FutDateEtamp(CalcDateStamp(Year*Month.Day)}; 

EMD; 


I This method allows us to apply a whole Long integer time/date stamp } 
| such as that returned by the DOS unit's GetETiae procedure to the } 


| combined time/date stamp | 

[ i.e.* ) 

l Seconds is always even] j 
l; i.e.* "06/29/89** I 

t i.e., “Thursday, June 29, 19&9" I 

I 0-Sunday* 1 ■'Monday, etc. | 

I Returns DoS-format time stamp I 
l Returns DCS-fomat date dtamp j 

: Longlnt); 
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1 When Db]ect, The object divides the stamp into time and date I 

\ portions and recalculates all Other fields in the object, J 


PROCEDURE When, PutwhenStamp {HeWWhen : bonglnt); 

BEGIN 

WhenStamp NewWhen; 

j We've actually updated the stamp proper, but we use the two ) 

1 "put" routines for time and date to generate the individual \ 

( field and string representation forms of the time and date. \ 

( T know that the "put* routines also update the long integer \ 

( stamp, but while unnecessary it does no harm. ) 

PutTimeStatnpCWhenUftiocHWhenStanp) .TimePart) ; 
PutiDateStaTnp(WhenUnian1HhenSLampJ .DatePart ); 

END, r 


\ We can choose to update only the time stamp, and the object will J 
j recalculate only its time-related fields, j 

PROCEDURE When, Put Time St amp (NewStanga : Word); 

BEGIN 

WhenUnion (WhenStamp) .TimePart ;** NewStajnp; 

[ The time stamp in actually a bitfield, and ail this shifting left I 
[ and right is just extracting the individual fields from the stamp:] 
Hours :=• NewStamp SHR 11; 

Minutes (NewStamp 5HR 5) AND S003F; 

Seconds := (NewStamp SHI, 1) AND SOOIF; 

[ Derive a string version of the time: \ 

CalcTimeString(TiroeString,Hours,Minutes,Seconds!, 

END; 


[ Or, we can choose to update only the date stamp, and the object ] 
[ will then recalculate only its date-related fields. j 

PROCEDURE When.PutDflteStamp(NewStamp ; Word); 

BEGIN 

Whenunion(WhenStamp).DatePart := NewStamp; 

I Again, the date stamp is a bit field and we shift the values out I 
[ of it: f 

Tear : = (NevStamp SHR 9) + 1900; 

Month :- (NewStamp SHR 5] AND S0OQF; 

□ay ;= NewStarap AND SODIF; 

[ Calculate the day of the week value using teller's Congruence: ) 

DayOfWeeA :« talcDayG fNes k(Yea r,Hunt h,Day l ; 

I Calculate the short string version of the date; as in ,t Q'6/29/'09": ) 
CalcDateString(Datestring,Tear,Month, Day); 

l Calculate a long version, as in "Thursday, June 29, 1989": ) 

CalcLonqDateString (liOngdateString, Year, Month, Day, DayOfWeek); 

END; 


PROCEDURE When.Put NewDat e[NewYea i ,NewMont h,NewDay E Word!; 

BEGIN 

\ The "bogs'* field is the date stamp. Everything else is figured ) 

( from the Stamp, SO first generate a new date stamp, and then \ 

\ (odd as it may seem) regenerate everything else, ‘including* ) 

\ the Year, Month, and Day fields: ] 

PutD&testamp(CilcDateEtamp(NewYear,NeWMonth,NewDay ]); 

\ Calculate the short string version of the date; as in "06/29/09": ) 
CalcD*teString(Da te£tring,Year,Month,Day); 

| Calculate a long version, as in "Thursday, June 29, 1989": ) 
CalcLongDateStringiLongdateSt ring,Year,Month,Day,DayOfWeek); 

END; 


PROCEDURE When,PutNevTimefNewHours,NewHinotes,NewSeconds : Word!i 
BEGIN 

j The "boss" field is the time stamp. Everything else is figured ) 
( from the stamp, so first generate a new time stamp, and then ) 
ij (odd as it may seem) regenerate everything else, ‘including* I 
\ the Hours, Minutes, and Seconds fields: 1 
PutTime£tajnp(CalcTiJDeStAjnp(NewHours, NewNinutes, NewSeconds)); 

I Derive the string version of the time: I 
CalcTimeString{TimeSbring,HourMinutes,Seconds f; 

END; 


End listing One 

Listing Two 

PROGRAM TimeTest; 

USES Crt,TimeDate; 

VAR 

Now : When; 

BEGIN 

Writer At the tone, it will be exactly *); 

Delay(1000); 

Now „ PutNo , w; 

Sound(1000); Delay(100); NoSound; 

WTTH Now do Wr i tel EUTirtseSt ring, *m on 1 ,LongDe test ring, *.' ) ; 

ReadIn 
END. 


FINALLY 

THE IDEAL “C” SEMINAR! 

Within one week, you can increase the value of 
your employees by adding “C to your 
company's programming language vocabulary! 

"convenient cost-efficient 

“C” TRAINING 

Thousands ol people have been Trained and 
they have given CLA courses consistently 
superior reviews with our competitively priced 
courses. Become proficient in ANSI Jl C" 
in one week. 

FLEXIBLE SCHEDULING 

Public classes are offered monthly in our 
Collingswood office, convenient to 
Philadelphia. Classes can also be scheduled 
at your company site. 


FOR FAST INFORMATION 

CALL TOLL FREE 

1-800-842-9667 

and we will FAX or mail you the 
latest brochures_ 


CIS A 

COMPUTER LANGUAGE ARTS 

704 Had don Avenue; Collingswood, NJ 08108 
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Re-invent The Wheel 

Looking tor a powerful, 
feature packed text editor to be included 
into your application? Now available: 

TE Developer's Kit 

TE Developer's Kit is the most cost effective way of incorp¬ 
orating text editing features into your application. The kit includes 
complete source code of the editor, library routines and the executable 
file. TE Developers Kit supports Microsoft and Borland V compilers. 

The Features Include: 

* Complete full screen editor. - Multiple fifes/windows. * Word wrap and 
printing functions. * Support for files larger than available memory. 

■ Reeonfigurable Keyboard commands and screen colors, * Keystroke 
macros, * Undo. * Columnar block commands. * Search/replace. -Autosave. 

The kit includes TES small editor routine. TES provides scrolling 
functions, word-wrap and block commands. An application can 
call this routine without any modifications to the routine. Your 
application specifies window co-ordinates, maximum file 
size, and an input buffer or file. 

The Kit is most favorable priced at $139.00 


To Place an Order, Call 

Sub Systems, Inc. ■ 1-800-447-6819 

159 Main Street, #8C, Stoneham, MA 02180 • 1-617-438-8901 
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OF INTEREST 



Actor 2.0 S an object-oriented develop¬ 
ment environment for Microsoft Win¬ 
dows applications, has been announced 
by The Whitewater Group. Version 
2.0 boasts an automatic object swap¬ 
ping system that swaps static objects 
and code out to disk, which allows 
developers to break the 64t)K barrier 
of MS-DOS and create applications that 
are larger than 1 Mbyte in size. It does 
this by means of an LRU (least-recently 
used) algorithm, which ages unused 
objects and sends the old ones out to 
disk. 

Actor 2,0 also has additional object- 
oriented features, new commands, and 
improved support for C. Whitewater 
spokesman Zack Udocker told DDJxhai 
“programmers wanted increased com¬ 
patibility with C so we’ve added the 
ability to pass C structures and com¬ 
bine primitives in C and assembly lan¬ 
guage. This means you can get directly 
into the low-level structure of objects/' 
2.0 runs on any PC or PS/2 (or compa¬ 
tibles) under Microsoft Windows, and 
requires 640K of memory* a hard disk, 
a graphics card of any resolution, a 
mouse, and Microsoft Windows 2.x or 
later. The cost is $695, but registered 
users of previous versions can upgrade 
for $149. Reader service no. 20. 

The Whitewater Group 
600 Davis St, 

Evanston, IL 60201 
708-328-3800 

Version 2,00 of Top Speed Modula-2 
has been announced by JP1 This ver¬ 
sion works with the multilanguage de¬ 
velopment recently released with 
TopSpeed C, which automatically se¬ 
lects the appropriate compiler for the 
source file it needs to compile, and 
includes nine editing windows, 500K 
per file, and a hypertext help system. 
New compiler options allow interfac¬ 
ing of C libraries and functions with 
Modula-2 programs, and vice versa. The 
optimizing code generator is featured 
in the new family of TopSpeed lan¬ 
guages (including a TopSpeed Pascal, 


which has also been announced), com¬ 
mon to all the languages. 

TopSpeed Modula-2, Version 2.00, 
has multiple memory model support, 
and new keywords and syntax exten¬ 
sions allow object-oriented program¬ 
ming, A new keyword CLASS allows a 
RECORD-like structure to include PRO¬ 
CEDURE declarations, hide data, spec¬ 
ify inheritance and VIRTUAL proce¬ 
dures. And syntax extensions allow the 
name of a variable of a CLASS type to 
qualify the name of a procedure. 

Included now in all TopSpeed com¬ 
pilers is the Visual Interactive Debug¬ 
ger (VID), which is a multilanguage 
source-level debugger that features on¬ 
screen display of all breakpoint traps, 
single-step operation, and full source 
code inspection. TopSpeed Modula-2 
is available for DOS ($395 for extended 
edition) and OS/2 ($495 for extended 
edition). Reader service no. 33- 
Jensen & Partners International 
1101 San Antonio Rd., Ste. 301 
Mountain View, CA 94043 
415-967-3200 

A software development tool that gives 
the 80386 processor the same level of 
protection available in protected oper¬ 
ating systems has been announced by 
Nu-Mega. Bounds-Checker automati¬ 
cally detects out-of-bounds accesses by 
an application program* using the sym¬ 
bolic information created by the Micro¬ 
soft C 5.X and 6.0 compilers to show 
you the exact source line causing the 
out-of-bounds access. Nu-Mega claims 
that Bounds-Checker cuts steps in the 
development process and eliminates 
the need to debug, and that it prevents 
serious side effects of subtle overw rites 
that may not be particularly dangerous 
until the program is in the field. 

The Bounds-Checker provides real¬ 
time memory protection, differentiates 
between code and data, protects pro¬ 
gram code and all memory outside your 
program, and prevents the system soft¬ 
ware from corrupting your program — 
it can determine if a TSR or other pro¬ 
gram is trouncing your program. Sells 
for $249. Reader service no. 35. 
Nu-Mega Technologies 
P.O. Box 7607 
Nashua, NH 03060-7607 
603-888-2386 

Borland International lias announced 
Version 2.0 of its Turbo Debugger, 
which includes a toolkit that features 
the new Turbo Profiler. The profiler 
measures where in your program time 
is spent, how many times a line is exe¬ 
cuted, how many times a routine is 
called and by what, and which files are 
accessed most often and for how long. 


It also tracks the use of resources such 
as processor time, disk access, key- 
lx>ard input, printer output, and inter¬ 
rupt activity. 

The Turbo Profiler graphically dis¬ 
plays where your program is spending 
its time, Lolling you which parts of the 
program are used most often and may 
need optimization or rewriting, and 
which parts are used so little that you 
needn’t bother tightening them. An op¬ 
timizing compiler generates code for 
the program you give it. 

Multiple overlapping windows, icons, 
mouse support, and context-sensitive 
on-line help are included in the user 
interface. The Profiler works with Turbo 
Pascal 5.0, Turbo C 2.0, and Turbo 
Assembler 1.0, and any later versions 
of these compilers. Also supports Code¬ 
View and .MAP file debug formats. For 
IBM PCs and compatibles operating 
PC DOS (MS-DOS) 2.0 or later. Requires 
384K (256K for Turbo Assembler). The 
toolkit retails for $149,95. Reader ser¬ 
vice no. 34- 
Borland International 
1800 Green Hills Rd. 

Scons Valley, CA 95066-0001 
408-438-8400 

Version 4.0 of the LALR compiler con¬ 
struction toolkit can now be purchased 
from LALR Research. The toolkit in¬ 
cludes the parser generator, LALR, and 
a scanner generator, DFA, as well as 
various source code modules, such as 
a main program* a screener, parser skele¬ 
ton, and scanner skeleton, DDJ spoke 
with the developer, Paul Mann, who 
said that the LALR compiler is “an ad¬ 
vanced compiler construction tool that 
goes beyond YACC. It features extended 
BNF notation, automatic creation of ab¬ 
stract syntax trees, and a high-speed 
scanner generator. It’s well suited for 
developing compilers, translators, and 
interpreters for computer languages/ 1 

A BNF grammar describes the state¬ 
ments of the language as input to the 
LALR, and describes the symbols as 
input to the DFA, The LALR parser gen¬ 
erator provides automatic error recov¬ 
ery, and handles large grammars such 
as Fortran and CoboL The company 
claims that the DFA scanner generator 
produces high-speed deterministic fi¬ 
nite automatons that run about four 
times faster than LEX scanners. The 
source code output is compatible with 
Turbo C, Microsoft C, Watcom C* among 
others. The price is $495. Reader ser¬ 
vice no, 26. 

I.ALR Research 
1892 Burnt Mill Rd. 

Tustin, CA 92680 
714-832-2274 

(continued on page 157) 
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A revolutionary 32 bit implementation of a ForttvS3 
compiler, coupled with a high-productivity 
programming environment ■ truly compiled code * 
context-sensitive help - source-level debugger - 
stand-a lone a ppi icati on g ene rati on Used to develop 
the first commercial PostScript^ clone. 

Software Construction Compart 
2300 B Long ml re 'College Station * Texas • 77840 

<409) 696-5432 
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The $25 Network 

Try t 

* Connect 2 1 

* Uses serial 

* Rum all L 

* Runs in ba 

* Share any c 

* Needs only 

* Version 21 

Skep 

ifldQeS 

he 1st truly low cost LAN 

□r S PCs, XIV ATs, PS/2s r 3S6s 
ports and 5 wire null modem cable 

5K baud, up to 90 Feel 
ckgnaund, tolally iransparem 

Icvicc, any Hie, any lime 
r 14K of ram 

Si • OVER 15,000 SOLD 

tical? We make believers! 
Information Modes 

P.O. Drawer F, Dcnlon, TX 76202 

917-387 3339 Technical, 7 days 

1-800-626-7992 Orders 
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PRINTED GRAPHICS 
WITH TURBO PASCAL 

GRAPHLINK is ihe powerful printer software [huE doo for 
your printer what TURBO Pawiil^ BGI yniphk* does for 
your scrcen-al [he printer's, resolution! 

GRAPHLINK emulates TURBOS BGI commands, so 
adding thigh-resolution 1 primer graphics to ymi program 
Ik a snap! 

Supports HP LaserJet and DeskJet, Epson. IBM, Toshiba. 
NEC and other primer*. 

Unity $2? Tor single-user vers Urn, or 5250 for Graphlink 
Professional, which includes unlimited distribution license. 
Shipping S5 /Sit) 15 for USA } Canada / other. 

VISim:H SOFTW ARE 
D5 3807 Ridgewood Cl Pittsburgh. Pa 15239 

<4121733-4775 _ 
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GRAPHIC TOOLS LIBRARY 


MG LIB: Blazing Past. User coord., thick tines 
and arcs. Polygon Engine. Figure drawing. 
Splines. Fill. Text scale, rotate, align. Keyb, 
Mouse, Plots, charts and presentation graphics 
with a difference. Screen print, $99, 

PC VDI: Display and Printed graphics. Draw at 
printer resolution. Outline filiable font faciory. 
Pan, Scroll.Includes XGLTB, All GKS Draw NO 
ROYALTIES* Take NOVA PR1NVIEW lest 
Compare Quality, $395. 

SCAN PRO: Image tools library. Image Capture. 
Fasi Bitmap Graphics, Bilblt. Cut, Copy. Paste & 
more. Animation. Image Scale uptown* Rotate, 
Mirror, Tile fill and Window Scroll. Image data 
base. Text ami Line drawing. Fonts, Virtual 
Bitmaps. Pop-up's, Scaled Print/plnt Keyboard, 
"better 11 mouse & Video paging. EMS support & 
149 functions;. Multiple image file formats. A 
better package for .PCX file handling. Compare 
Quality. $149. 

FCXIO: Source Library available in "CV 
Assembler for reading/writing and display of ,PCX 
files, $295. 

ALL PRODUCTS: ANSI compatible. Include 
resident program for screen prim. Mere, to Super 
VGA. Most "C". PASCAL, FORTRAN, MS 
QuickBASIC and BASIC 



NOVA INC 
73IKI W. Higgins Road 
Suite I I 44 

Hoffman Estates, IL 60195 
7IIH-JU4Z-111» FAX; 7(JW-HJi2-t 173 


FREE TRIAL 

Pinnacle File Manager 

We guarantee immediate productivity gains 
from using our C file manager library. Simple 
tabte-and-column view of data with advanced 
B-Tree indexing and hi-speed cache frees your 
brain to solve application-specific problems. 

Vermont Database Corp, 

RR3 Box 6516 
Stowe. VT 05672 

602 253-4437 
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Paradigm Systems 

PQ Box 152, Milford. Massachusetts 01757 
(800)537 -5043 m ma (508)478-0499 


e.Sc. & M,S, in COMPUTER SCIENCE 

The American Institute lor Computer Sciences offers 
an in depth correspondence program to earn your 
Bachelor of Science and Master of Science degrees 
In Computer Science at home. BSc, subjects covered 
are M&'DOS. BASIC, PASCAL, C, Data Re 
Processing, Data Structures & Operating systems. 

MS program includes subjects in Software 
Engineering and Artificial Inieiligence. 

American Inst, far COMPUTER SCIENCES 

1704-DJ 11TH Avenue South 
Birmingham, AJ_ 35205 

(205) 933-0339 
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SOURCE LEVEL DEBUGGER 
FOR THE IBM ARTIC CARD. 


ATTENTION ARTIC CARD PROGRAM¬ 
MERS, Finally, a source level debugger. 
SARTICDB allows source level debugging lor 
multiple tasks, and on multiple cards. 
Independent of system unit operating system, 
fie. DOS, QS2 etc.) No more guess work 
when finding bugs. Exterminate bugs now 
with SARTICDB Gait for more information, 

ATLANTIC FIRMWARE 
(609) 795-9651 
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68000 

High Speed 


Cross-Assembler 


Macros/ 

Conditional 

Assembly 

68000/68010 
cade on a PC 
Compatible 


Software Construction 
Company, Inc, 

2900B Longmire 
College Station 


4 MB of source 
code assembled 
per minute 


Texas 77840 


Phone 1409) 696-5432 


5-Records, 
Binary, or 5pli1 
Binary 
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B.S. DEGREES 

... from fuiiy-accradifed Colleges. We help 
Computer Professionals avoid years of 
unnecessary class work. Gel the job offers 
and recognition you deserve. Phone UDA 
for more information and our free booklet 
N Career Ikdics and Strategies,'' 

University Degree Advisory 

® 800 - 765-7272 
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How to place your ad in the Programmer's Marketplace: 

Carefully type your message or send camera-ready art. Each ad is 10 x 13 picas (15/8 x 23/16 inches)* All ads must be prepaid. 
We accept checks, money orders. Visa, Mastercard, and American Express* Send your ad to: 

Programmer's Marketplace, Dr * Dobb s Journal, 501 Galveston Drive, Redwood City, CA 94063. 

For more information, contact: Glynn Mansfield at (415) 366-3600. 


Fast Screen Manager 


For BASIC, C r FORTRAN, COBOL, or ASM 
Menu, Data Entry, Pop-up and Pull Down 
Window support for all programmers. TSR or 
Linkable, 100 + page manual. 60-day, 
money-back guarantee. No royalties, Demo 
Available From $99. 

ViSA/MC. 

The West Chester Group Inc, 

P.0 Box 1304 

West Chester, Pa 19380 

(215) 644-4206 (800) 525-9244 
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druma FORTH-83 

Break the 64k memory barrier 

Powerful, attractively priced. '83 Standard 

* 1 Mb plus automated memory management 

* On lire documentation, ASCJI/block file 

* Others: windows, modules, profiler-debugger 

* Futt OS interface & a tot more 

■ IBM PC/XT/AT and all compatibles 

FREE fearn/ufiiity disks offered: INQUtRE 
Druma tnc, 

6443 Highway 290E, El03, Austin, Texas. 78723 
Orders: {51 2) 323-0443 BBoard: 512-323-2402 
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This library bring* The professional touch lo ynr programs and 
helps you overcome dillicu It tasks! Fcaiurrs: Create back-up 
roulirte* ‘with the file militles provided - Red]reel I/O to AN Y 
device Stacks & queues only limited by memory - Virtual 
Screen & window tug vy*teriiH - AUTO-DETECTS video 
aduplcr type (MD.A, CGA, EGA, VGA) User defined 
menus - RANDOM NUMBERS from within defined limns - 
LARGE assortment of multi fund ions Disk sector. FAT 
table & directory Irani pu Union, AND MORE! Why wasie 
time creating these lools? NO ROYALTIES! Call today to 
order your copy and give your programs the TOUCH, Object 
only: $99, Source Code: $299. VISA & MC accepted, 




PEANUT SOFTWARE INC. 

SIMS Norik /sLihlemy nis-d Suite 27t 
CotamdoSpTlfi^M. CO HtWiS 
1719) ZfilMlS'JH 


J 
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FIGHT PIRACY & PROTECT 
YOUR PROGRAM $$$’s! 


Since 1986, companies worldwide have been 
choosing Az-Tech security products , if you 
demancTlhe strongest protection available, why 
not choose one oflhese ‘ proven leaders ': 

*EVERLOCK Copy Protfiction 
*EVERTRAK Software Security 
*EVERKEY Hardware “Key" 

Software Security 


Az-Tech Software T Inc. 

305 East Franklin 
Richmond. MO 64065 

(800)227-0644 (816)776-2700 
Fax (816) 776-8398 


SORT FASTER THAN EVER BEFORE! 

QSORT is the world's fastest sorting utility 
that will scream through sorting your 
ASCII or fixed-length binary files, using 
user-definable keys, lexicographically, 
AND MORE! 

dQSORT will perform the same lightning- 
fast sorting operations on your dBASE 
data files. The awesome speed of 
dQSORT and QSORT will truly amaze 
you. 

The QSORT /dQSORT package is avail¬ 
able for only $50.00* Order the world's 
fastest sort utilities today! 

System Enhancement Associates 
21 New Street, Wayne, NJ 07470 
(201) 473-5153 
Visa and MC Accepted 

*dBASE is a trademark of 
Ashton-Tata 
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INGRAF 2*10 -graphics Library 


VIDEO, PRINTER &. PLOTTER Graphics Library Linear, LOG. 
Polar, Smith, Bar and Pie charts As&S with lick mards a anrwta- 
lion Multiple plots on a page. Marker and line types Scalable 
fonts Over 100 rguimfisi ta make GRAPHICS programming easy 
on IBM PC/XT.' 

AT and 
compatibles. 


Q, 

FORTRAN Quick¬ 
BASIC and P&bcbI 

$295.00 

Full Scsirca code. 

Ha RayallHE. 

Sutrasoft 

10505 Penman Or 
SuoartantJ. T)£ 
77473 

(713) 491-2069 
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Opt-Tech Sort/Merge 


Extremely fast Sort/Merge/Select 
utility. Run as an MS-DOS command 
or CALL as a subroutine. Supports 
most languages and filetypes indud ; 
ing Btrieve and dBase. Unlimited file 
sizes, multiple keys and much more! 
MS-DOS $149. OS/2, UNIX $249. 

( 702 ) 588-3737 
Opt-Tech Data Processing 

P,0. Box 67B - Zephyr Cove, NV 89446 
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STOP software 

PIRACY 

With our Copy Protection Products. They 
really work and don't burden the honest user.. 

For Hardware Based Security (Parallel Port). 

* STANDARD KEY TAG Unlimited Runs 

* COUPON KEY TAG Limited Runs 

* DURATION KEY TAG Limited (days) 



For Disk Security 
High Level Security 

* PADLOCK II DISK * COUPON DISKS 

* SAFEGUARD DISKS 

For Hard Disk Protection 

* HDCOPY 

Low Level Security - User Installable Protection 

* POPAPLOCK 

The market is filled with copy protection pro¬ 
ducts which burden the user or simply don't 
work, we have over 3500 satisfied software 
firms utilizing our systems. The high-level 
fingerprint has not required an update in over 
3 years. 

Why should your valuable data or useful 
software program become available in the 
Public Domain? 

Call or Write for 
more information, 

GLENCO 
ENGINEERING INC. 

SERVING THE SOFTWARE INDUSTRY SINCE 1979 
721 W Algonquin Rtf. {3*2)364 -SOFT (7630) 

Arlington HtS., IL 600Q5 FAX 364-7(198 Tetex 493-7109 
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How to place your ad in the Programmer s Marketplace; 

Carefully type your message or send camera-ready art. Each ad is 10 x 13 picas (15/s x 23/16 inches). All ads must be prepaid. 
We accept checks, money orders, Visa, Mastercard, and American Express. Send your ad to: 

Programmer’s Marketplace, Dr. Dobb's Journal, 501 Galveston Drive, Redwood City, CA 94063. 

For more information, contact: Glynn Mansfield at (415) 366-3600. 


Source Code for C 


new gnu c + * 


$150.00 

new gnu c 


$150.00 

new gnu symbolic debugger 


$45.00 

■ghosiscripi 


$45,00 

gas 


$45,00 

blnutlte 


$30.00 

bison 


$30,00 

gmp 


$15.00 

PC Curses 


$15.00 

r lew PCGu-rsas wiih Microsoft C 5.1 lib 


$20.00 

Spe&ty MS-IXJS w CPtO iomtat 


Cvid 0 / tMVJtt tat at ate 

•SSOtfa'ing 


Networks 



SO-47 m Road 



WDodhaven, NY 11421 

(201) 206-0320 
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85,000 professional 
programmers will read this 

ad... 


And you could have advertised to all of 
diem for about 1/2~c©nt each. 

Get your advertising message in the 
Programmer's Marketplace! 

Call Glynn Mansfield at 
(415) 366-3600 


Network API Library 

For Microsoft and Borland C or Pascal. 
Compatible with IBM, 3Com, Banyan, and 
Novell networks. Includes DOS and 
NetBIOS netwoik functions. Netware API's 
for login, mapping, print queues, IPX/SPX, 
etc. New! Portable IPC, RPC, and remote 
window routines. $99.95 

Information Software Associates 
P.O. Box 2582, Iowa City, IA 52244 
Call for more info (319) 354-6804 


QuickBASIC File Indexing 

Create B+ Tree file indexes in QuickBASIC with 
Index Manager. 1 " 1 Access files randomly by full or 
partial key. Or sorted forward or backward. One 
module performs all lunctions making IM very easy 
to use. Only Indexes managed! You retain full 
control over your data. Assembler code and cache 
buffers make IM very Iasi Demo on GEme and 
CompuServ. Eight sample programs and 64 page 
Users Guide included. Only $59 (+ lax in CA). 
VISA'MC accepted. 

CDP Consultants 
1700 Circo Del Cieto Drive 
El Cajon . CA 92020 
(619) 440-6482 
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FORTRAN PROGRAMMER? 

Now you can call 2-D and 3-D graphics 
routines within your FORTRAN program. 

GRAFMATIC screen routines $135. 

FLOTMATIC: plotter driver $135. 

FRIMTMATIC: printer driver $135. 

For the IBM PC, XT, AT & compatibles. We 
support a variety of compilers, graphics bds .. 
plotters and printers , 

MICRQCGMPATfBLES 

301 Prelude Drive, Silver Spring. MD 20901 USA 

(301)593-0683 
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UNDERSTANDING C 

6 hours of videotape gives the in-depth details of ihe 
ANSI C language. 200 screens of examples leach 
you to write like an experienced pro. Leam about 
structs, pointers* bit l ldidting - all the details of C syn¬ 
tax. 100% satisfaction guaranteed! $59.95 (no extra 
charge for CO D.) Call now for info or C O D. 

ori,er 1-800-762-5515 

Automation Education 

2509 Royce Dr. 

Arlington. Texas 76016-1232 



DYNAMICS GRAPHICS LIBRARIES 

Save Development Time! 
Contour, Bar, Pie, X-Y, Log, Spherical 
& 3D Fishnet graphs are autoscaling. 
Dynamic 3D motion of models. Fast 
polygon fill Write one routine to 
support CGA/EGA/VGA/Fierc. & Dot 
Matrix/Laser/Plotters at full resolution. 
No Royalty! For "C H QuickBASIC & 
FORTRAN Starts at $140! 

CHIRP TECHNICAL SERVICES 

Call For Details! (619) 632-9510 


BASIC to C 


0AS„C v3,2 accepts BASICA, Quick BASIC v3 ? 
GBASIC86, or other different BASlCs by adding 
new statements, functions (Customer), generates 
structured, indented, scoped C. MSTTurtoo/Lattice/ 
Aztec C. AH memory model, compile option are 
supported, C source code (Runtime Library) is 
included. Run on MSDOS, XENIX, UNIX. 95% 
conversion ratio Demo disk. From £280. 

GOTOLESS CONVERSIONS 

P.O Box 835910 
Richardson. TX 75083 
(214) 404-1404 
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DEVELOPMENT LIBRARIES FOR PC 
PROGRAMMERS 
Source always included!!! 


AVAILABLE FOR PASCAL. ADA, MODULA-2 and C 

product per language aH languagei 

*B7Voe-e«0 and disk versions $42.95 $139.00 

'L*l«i r slacks end queues 534.95 * 109-00 

■Trees-birtaijr arid heaps $4205 $139.00 

et\ packages $96 00 $295.00 


order direct: 


REGAN SALES 

PO BOX 2204 
BOTHELL, WA 96041-22M 

(206) 820-2803 
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Finally! 

An Operating System which brings Real-Time 
response, multi -Tasking operation, Multi-User 
support, and Presentation Management to the DOS 
operating environment! 

Introducing... 

T/L Executive ™ 

The ideal software solution for programmers 
developing real-time, multi-tasking, DOS 
compatible application programs or enhancing 
existing DOS application programs. 

Features: 

* Real-Time Kernel, Preemptive Task 
Scheduler; 

* Fast, up to 12,320 task switches/sec (l6Mz 
AT); 

* Multi-Tasking, up to 255 prioritized tasks; 

- Full DOS Compatibility; 

- Runs on any PC-XT, AT, PS/2, or 
compatible; 

* Efficient, requires only 40KB of RAM: 

* Complete Intertask Communication 
capabilities; 

- User Configurable Operating Parameters; 

* Presentation Management Menus and 
Windows; 

* Multi-User Support for up to 35 system 
users; 

* Execute tasks in up to 8 MB of EMS RAM: 

* NETBIOS compatible Networking 
capabilkes; 

* User Programmable Function Call Security; 

For more information about T/L Executive, please 
call or write; 



Talton/Louley Engineering 


9550 Rsdgchaven Coun 
San Diego, CA, 92123 
(619) 565-6656 


HUGE Professional 

K VJ * J Shareware Libraries 



CDiTiptetnaBive, yp-ru-Uatc, iiMfcxed cnlKrfiinw erf *1! PD/Shareware 
uuIitLesfof professional develcifiers nrgant/ed oy specially area, 

tYwIucI UiiilisTfcft Price _Fredurl LfotaTiks Price 

dBasc/dHaie Ajuunblcr II/I7U $49.50 

Compilers, 50/1000 $9930 Dos Utilities 21^300 $49.50 

AutoCAD 20/000 $99.50 C 19/400 *49.50 

Turbo Pascal 19/200 $49.50 VenlUia OTP 21/[70 $49.50 

Low*. 125 15/250 $49 50 Games 30/200 $49,30 

Via, MCard, Wkdhf llnlnidr np. dilrfl COD, Coriwiitt POs 
EMS. 4505 Buckhursl CL.Olney, MD 2CJS32 USA 
(301) 924-3594 Fax: (301) 963-2708 
In France: {l)4776T&72 
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PROGRAMMERS' SHAREWARE 


Language sets. Each disk in these sets is achrved 

with over 700K of utilities, toolkits, graphics, and 

windowing support. All Include necessary 

documentation and most Include source code. 

□ C(LIB) Microsoft and Turbo C, over 4.5 MB, 7 disks, 
$20 

□ (TP4) Turbo Pascal, 4.5 MB. 7 disks, $20 

l) (DBASE) dBASE III + Library, over 4.5 MB, 7 disks, 
$20 

□ (ASEM) Assembler library, over 5 MB, 7 disks, $20 

□ (PROL0) Turbo Prolog Lib., over 3 MB, 5 disks, 

$15 

□ (BASIC) Turbo and QuickBASIC, over 3 MB, 5 
disks, $15 

□ Windows Boss (LC07) Windows, Pull Down & Pop 
Up Menus, Data Entry etc. Supports Turbo G, 
Microsoft & others 

O DeSmet C Compiler (LG 15) Full C Compiler, 

UnKer. Assembled! Complete Cl First Full C 
Compiler in Sharewarel 

□ Integrated Basic Compiler (LB0S) Full environment; 
Edit, Compile, Debug and Run all within the 
environment. On Line Help. Much like QuickBA¬ 
SIC™! 

□ Smart Disassembler (LAI 2) Smart Labeling 
Disassemble to disk, screen or printer. 

□ Programmers Reference Disk (UT30) Huge 
amounts of valuable reference material 

LJ TSR Tutorial (UT31) Complete tutorial with source 
code examples. Morei 

Free shipping! Toll-free ordering! 48-hour 
turnaround! Free 64-page catalogue I 
VISA/MC! 

Computer Solutions Northwest 
P O Box 440 
Benzonia, Ml 49616 
( 500 ) 327-2540 ( 616 ) 325-2540 
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r—I TUB" is FASTEST! 

0:41 

—l- 2 ^ m 

SFIMS'SS mcs‘ IUB'“ 3.0 TUB" UO 

Turn* arc to upfcle a IX Ifrfry an a PCiTT PVCS anf 'll ( 3 p bi® 

\im 5*pl 07 PC Zer.h .Animal SflMB HH jjh Mar veshih 

"TUB is a great system '" Jim Vallino, PC Tech Journal 
Full-Featured Version Control for Software Professionals. 
Check-in/'oul locking, branching, keywords, audit trail, wild-cads, 
file lists. Can merge parallel versions and undo Intermediate 
revisions. Mainframe compatible deltas tor Pansophic, ADR, 
IBM, Sparry integrated Landon Dyer PD MAKE Just $99,95 i $5sfli. 

b station LAN feense S29S.35 ■+ $5 5 /h, cail Iff other sizes MS-DOS 2x 3lk„ 4.x. 

BURTON SYSTEMS SOFTWARE 

PQ Box 4156, Cary, NC 27519 (919) 656-0475 
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OF INTEREST 


(continued from page 152) 

BrainMaker v2.0, a system for design¬ 
ing, building, training, testing, and run¬ 
ning neural networks, is now available 
from California Scientific Software. 
The company claims that version 2.0 
is a major enhancement, and has such 
features as the NeLMaker, which is a 
network generation and data manipu¬ 
lation program with spread-sheet style 
data display and the ability to perform 
arithmetic operations on data. In addi¬ 
tion, BrainMaker now reads data from 
Lotus, dBase, Quattro, and Excel files; 
automatic numeric translation allows 
the display of large numbers; graphics 
post-processing of network results is 
supported; and it includes training and 
running algorithms that are as fast as 
500,000 neural connections per sec¬ 
ond. Mark Lawrence, CSS president, 
told DD/that “with Release 1, we knew 
we had a neat technology, and that our 
users would have to tell us what it was 
for. They told us it was mostly for fi¬ 
nancial forecasting, so now we've gone 
back and written it like it should have 
been.’* 

This upgrade includes the Iniroduc- 
Hon to Neural Networks, an overview 
of the history and research of neural 
networks, and a user’s guide and refer¬ 
ence manual. The cost is $195, $95 for 
registered users. Requires a PC, PS/2, 
or compatible. Reader service no, 21. 
California Scientific Software 
160 E. Montecito Ave., #E 
Sierra Mad re , CA 91024 
818-355-1094 

Macintosh Allegro Common Lisp (CL), 
v. 1,3, an extended implementation of 
Common Lisp, is being shipped by Ap¬ 
ple Computer, It supports all the fea¬ 
tures described in the Guy Steele text 
Common Lisp: The Language, The Macin¬ 
tosh Allegro CL can be used to develop 
stand-alone Macintosh applications and 
to port applications developed on other 
machines. 

User interface components can be 
modified both interactively and under 
program control. Events are caught and 
dispatched by the Lisp run-time kernel. 
Windows are accessible as high-level 
objects, and can be created and dosed 
with simple Lisp functions. Menus and 
dialog boxes are implemented as ob¬ 
jects, as well. Fred, an integrated pro¬ 
grammable editor, combines the capa¬ 
bilities of Emacs with the multiple- 
window, mouse-based editing style of 
the Mac. The Stand-Alone Application 
Generator produces ready-to-use Mac 
applications, which require a l< nominal 
fee” license to distribute. System re¬ 
quirements include any Mac except the 
512K, a second 8Q0K disk drive, and 
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Bar Code Printing Can Now Be 
Part Of Your Programs 
With Code Master Libraries! 
Accuracy • Versatiltiy • Quality 

•increase profits • Enhance productivity 
■DOS r Unix, and OS/2 compatible 
•Integrates with C r Clipper, more 
•Supports most PC printers ‘Money back gurantee 

Royalty Free 4389- Source Included 
Call For Details! 

1-800-552-2331 



CONNECTION 

P.Q. Box 634 • Eau Claire, Wl 54702 
(715) 833-2331 
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JLaser 5... $399 


Laser Printer Controller 



Thinking of buying a 

■ LaserMaster 

■ Intel Visual Edge™ 

■ Kofax board 

JLasef 5 gives you the functions of all 
three boards combined into one, plus EMS: 

■ Fast laser printing 

■ Halftones on a laser printer 

■ Group 4 file printing and display 


OF INTEREST 


Mac System Software, Version 6.0. It 
sells for $495. Reader service no. 28. 
Apple Computer, Inc. 

20525 Marian! Ave. 

Cupertino, CA 95014 
408-996-1010 

MS-DOS Kermit, Version 3A is now 
available from the Columbia Univer¬ 
sity Center for Computing Activi¬ 
ties. The new features include transfer 
of text files in international character 
sets via a new Kermit protocol exten¬ 
sion; emulation of the DEC VT320 ter¬ 
minal, including soft function keys and 
support for a wide variety of interna¬ 
tional character sets in any of the five 
standard PC code pages; and sliding 
window' packet protocols for improved 
file transfer performance over public 
data networks and long distance satel¬ 
lite connections. 

Version 3-0 also has expanded sup¬ 
port for local area networks, and en¬ 
hanced Tektronix graphics terminal emu¬ 
lation with VT34G extensions, Graph¬ 
ics screens may he saved in TIFF 5.0 
for importation into such applications 
as WordPerfect, Pagemaker, and Ven¬ 
tura Publisher. This version was pre¬ 
pared by Joe R. Doupnik of Utah State 
University in cooperation with Colum¬ 
bia University. Reader service no, 29. 
Kermit Distribution. Columbia Univ. 
Center for Computing Activities 
612 W. 115th St. 

New York, NY 10025 
212-854-3703 



TALL TBfiESygTEMS 

2SS5 E. Bayshore Rd. * Palo Alto, CA 94303 
(415) 493 1980 • FAX (415) 493 7639 

Vwsterra auatebb tor HP Sef tea II ano Canon 1BIM Inar puritan 
to Itoriucti b™ IraUeroatfcH rt mek jutpeawm o™npwu*s 
Ai'twort; tor Eftm ad onrrinJ wtiti JLancf $■ And included’ 
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FASTEST! 

0£9 

SRMS V 32 PVCS™ TUB" 3.0 TUB M.12 

Times are to update a 45K Iferary an a PC/XT PVC5 Hfld TLIH 3.Q are 
Irom Sepir 67 PC Tech jW.hi 1 SftMS and TUB 4.f2 we lain* versions 

TUB” is BEST! 

"Do not befooled by the fact that this is the 
least expensive of the five packages reviewed 
here - 7 LIB has features and power to spare" 

John Rex, Computer Language 

"TUB is a great system" J. Vail Inc, PC Tech J 

• Full-Featured Version Control for Software 
Professionals. Check-in/out locking. Branching 
Keywords. Wildcard and tist-of-file support. Can 
merge parallel changes and undo intermediate 
revisions. Network and WORM support. Main¬ 
frame compatible deltas for Pansophic, ADR, 
IBM, Sperry, Integrated Landon Dyer PD MAKE 

MS-DOS 2.x, 3.x, 4.x Just $99.95 + $5 s/h vim/mc 
5 station LAN license $299.95 + $5 s/h, call for other sixes 

BURTON SYSTEMS SOFTWARE 

PO Box 4156, Cary, NC 27519 (919) 956-0475 




Stony Brook Professional Modula-2, Ver¬ 
sion 2.0, is now available from Stony 
Brook Software This compiler pack¬ 
age includes the QuickMod compiler 
and an optimizing compiler; develop¬ 
ment support for DOS, OS/2, and Mi¬ 
crosoft Windows; the ability to inter¬ 
face with libraries written in C or other 
languages; the Ml6 debugger; an ex¬ 
tensive run-time library; built-in multi¬ 
tasking; and the Stony Brook linker. 

The Stony Brook environment gives 
you control over source file placement, 
keystroke macros, the ability to per¬ 
form DOS commands, a cross-refer¬ 
ence of module dependencies, inter¬ 
face to the symbolic debugger, and Lhe 
ability to assemble foreign language 
modules. QuickMod complies with 
Wirth’s definition of Modula-2, and sup¬ 
ports symbol scoping and forward ref¬ 
erence capabilities in one pass. Added 
are structured constants, array sub¬ 
strings, conditional compilation, type 
coercions, and set types containing up 
to 65,536 bits. The whole package re¬ 
tails for $295; the source code for the 
run-time library costs $150, Reader ser¬ 
vice no. 24. 


Stony Brook Software 
187 E. Wilbur R., Ste. 9 
Thousand Oaks, CA 91360 
800-624-7487 (US) 

805-496-5837 (Calif, and International) 


Kooks of Interest 

NeumlSource, 7 he Bibliographic Guide 
to Artificial Neural Networks, by Phillip 
Wasserman and Roberta Oetzel, is avail¬ 
able from Van Nostrand Rein hold 
This bibliography purports to be the 
most extensive collection of research 
information on neural nets. Periodi¬ 
cals, private reports, and books are in¬ 
cluded, Sells for $64.95. ISBN 0-442- 
237764, 

Also by Wasserman is Neural Com¬ 
puting, Theory and Practice. This Is 
an introduction to artificial neural net¬ 
works for the nonspecialist. Assumes 
no math background beyond an un¬ 
dergraduate scientific education. Uses 
a step-by-step algorithmic approach to 
present commonly used network para¬ 
digms. $36.95, ISBN 0-442-20743-3. 
Reader service no, 30, 

Van Nostrand Reinhold 
P.G. Box 668 
Florence, KY 41022-0668 
606 - 525-6600 

Elements of Functional Programming 
by Chris Reade has been published by 
Addison-Wesley, Covers the concepts 
and techniques used in modern func¬ 
tional programming languages, as well 
as support for abstraction, program¬ 
ming with lists, new types, abstract data 
types and mtxlules, lazy and eager evalu¬ 
ation, and implementation techniques. 
Hardback edition costs $37.75, ISBN 
0-201-12915-9. Reader service no, 3T 
Addison-Wesley 
Reading, MA 01867 
617-944-3700 

Tlie COSMIC Software Catalog 1990 
Edition is available from the Univer¬ 
sity of Georgia. It is a comprehensive 
listing of program abstracts describing 
all available NASA computer programs. 
You can purchase it in book form ($25), 
on microcomputer diskette ($30), on 
magnetic tape ($50), or on microfiche 
($10). The catalog cross-indexes over 
1200 computer programs, in areas such 
as aerodynamics, reliability, compos¬ 
ites, heat transfer, artificial intelligence, 
and structural analysis. Reader service, 
no. 32. 

COSMIC 

University of Georgia 
382 E. Broad St. 

Athens, GA 30602 
404-542-4807 

/continued on page 125) 
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EXPANDED SELECTION... 


When we started Programmer’s Connection in 1984, we dedicated 
ourselves to providing the highest level of quality service possible. 
As a result, we've become the world's leading independent dealer 
of computer products for IBM personal computers. We invite you 
to call us today and experience our quality service for yourself. 

EXPANDED PRODUCT LINE. We have always provided you with 
the largest selection of software development tools. Now, to ser¬ 
vice all of your personal computer needs, we have expanded our 
product line to include popular business applications and hardware 
products. So, call today and find out why Programmer's Connec¬ 
tion is your one-stop connection for personal computer products. 


INFORMATIVE BUYER'S GUIDE. The CONNECTION , our FREE 
comprehensive Buyer’s Guide and Catalog, contains prices and 
up-to-date descriptions of over 1200 products by more than 440 
manufacturers. Each description includes major product features, 
special requirements, version numbers, diskette sizes, return 
policies, and other information. Plus there are interesting articles 
by leaders in the programming industry, New Product Spotlights, 
Technical Questions & Answers, and much more. 

To Get Your FREE Copy: 1)use the reader service card provided 
by this journal; 2)mail us a card or letter with your name and ad¬ 
dress; or 3)u$e one of our convenient toll-free telephone numbers. 


386 products Qurs 

C Network Compffer/386 by Nwel _ m 790 

FnL±m2byl^CornfxA&^ ... 695 779 

NOP C-386 by MfcmWty......-. New 895 799 

QEMM-386 Expanded Manay by Quad&dadt . 100 65 

WATCOM C7.0/3B6 by mcm Group . 895 639 

assembly language 

ASHROW by Ouantasm Corporation .. 100 79 

BIOS Prfc-Proces$0f by V Communications. . 140 109 

Microsoft Macro Assembler by Micmsofi _ iso 105 

Re; Source by rkmsofl Corporation .... Nm 150 119 

blaise products 

ASYNCH PLUS *... 189 134 

CASYNCH MANAGER... 189 134 

C TOOLS PLUS/6,0... 149 99 

POWER SCREEN Si^orte C, Pascal and BASIC ..149 96 

POWER SEARCH. 149 99 

Turbo C TOOLJ5/2.0. 149 99 

VlEW232S^£^Anaipsf... w .189 149 

c language 

Lattice C C ompilor DOS & OS/2, by Lattice ....... 250 169 

Microsoft C Professional Development Sys. 495 339 

TopSpeed C DOS Standard by Jensen 4 Partners. 199 158 

Turbo C 2.0 by Borland .. 150 99 

Turbo C10 Professional by Borland . 250 169 

WATCOM C7.0 by WATCOM Gwp... 396 309 

c utilities 

BAS C by Gotohss Conversion... . 290 249 

C-DAtA MANAGER by Database Technologies 300 239 

C talk fay CNS_._..... 150 135 

CbDANiy 395 349 

CODE MASTER by The Compeer Connection . New 289 239 

Graphica-MENU for Borland BGL by Island Sys _ 99 79 

for MetaWINOOW ____,_ 149 119 

Heap Expander by The Tool Makers ... BQ 72 

PC Utlt by Gimpaf SGflWanj . New Sfaskx 1 139 99 

PRCLC by Wstonor.. 399 299 

Sherlock Defxjgper for C fay Edward K. Ream .__ 195 174 

SUkTE^^mrf^G-tJLp .......~ 299 239 


. 396 329 

tor Endows, PM or Mac Character Deploys __ 596 496 

C++ language & utilities 

C++10 Compiler by zofuech _____ 200 179 

C++ 16 Debugger by ZQRTECH ... New 150 129 

C++ 2.0 Developers Edition by ZORTECH . 450 399 

C++ 2.9 Tools by ZORTECH ..... 150 135 

C++ 2.9 Video by ZORTECH .. New 500 429 

Guidelines C++ by Gidafaes krtwaw... 335 339 

INTEK C++ by ffTEK ... New 495 449 


database management 

Clipper tyjVartfu**___ _ __ 796 499 

FORCE eBASEOm*** ty&ptee „____ 695 559 

WinTiieva by Whiewatar Group . 395 338 

file management utilities 

AtcSyS tor dSWSE or F&fadw.fay Copia tot ... 395 348 

Code Base 4 by SfCMTEfl Software ... 295 239 

FairCom Toolbox P rofeukma I by FaitCom - 1095 775 

c-bee Fne Handler... 395 278 

r4ree Report Generator... 295 196 

graphic utilities 

GRAFMATKJyAiferaOTr^^ 136 119 

GraphiC fay Samfafc ___.........._ 396 319 

Graphics Development Toolkit by GSS ... 596 498 

Menuet by Ithaca Street Software 325 259 

MetaWI N DOW No Roya/bes, by Metagrapbics ............. 250 153 

PCX Effects vM\ Source, by GENUS .. 199 159 

PCX Programmer’s Toolkit w/Sow*, by GENUS _ 496 399 

PCX Text with S**c* r by GENUS .. 299 249 

greenleaf products 

Grtenfeal Business MathUb.396 278 

Greenfeal Comm Library. . 299 16S 

Greenleal DataWindOWS Indudes Swk Code . w 336 223 

toOSP ...*. 386 223 

Greenleaf Functions... 229 143 

Greenleaf MakeForm-DOS... 125 93 

Greenleaf SuperFuoctkms .. 299 203 

Greenleaf ViewComm... 549 359 

program mgmt utilities 

PolyM ake UNtX-Ae by Sage/Pbtyton .„„ 149 124 

PVCS ProfeSSkXial 8^ 495 334 

TUB l+rston Control System by Burton 100 83 

screen management utilities 

C -SCa pe ttfLook 4 Feet, by Oakland .New Uereibr? 499 475 

C Windows TooIkH by Magna Carla Software 100 79 

Curses by Aspen Scientific . w ..... 159 129 

JAM Application Manager by JYACC„ _._..._ 596 463 

Vitamin C by Creative Programming . . 225 163 

VC Screen fim Desgner 149 113 

Vitamin C for OS/2 by Creative Programming _ 346 278 

south mountain products 

C Utility Library.. 3 *g 148 

Essentia I B-Tree with Source Code . .. . 199 148 

Essential Communications .............................. 329 199 

Essential Graphics Source Code . . 1398 999 

Hold Everything.. 129 99 

Tresidence*/ with Source Code. Jtew Version 249 189 


text editors 

Brief tom Sotataf] Systems ... Umbr 10 

Brief for OS/2 by LtoerWare...Weracm 10 

Epsilon Emacs-llre editor by Lugaru 
KED1T by Mansfcld Soflware Grotp 
Vedit Plus by CdmpoView ............. 

turbo pascal utilities 

B-Tree Filer by TuboPowe r Sc^fwane... . 

GraphUnk Printer Graphics Tootkit by Msifecft....... 

Inside! Turbo Pascal by Paradigm Systems .. 

Object Professional 1.0 by Mwftmr Software .. 

Turbo Pascal 5 5 by Borland ____ 

Turbo Pascal 5^ Professional by Borland _ 

Turbo Professional 5.0 by hrboPpwer Software 
TurboGeomelry Library by Disk Software. 

other languages 

Actor by Whitewater Group .... 

F77L-EM/18 by Lahey Computer ..................... 

Microsoft BASIC Professional Develop Sys.. 

PowerBASlC by SPECTRA Ptitehtog .New 

Professional Modula-2 by StonyBrook Software .. 

Prograph for Mac r by TGS ^sterns . ..New 

Smalltalk/V PM by apt* .... 

TopSpetd MODULA-2 Standard by JPt . 


other products 

BatCOm by WerVam Software 
Berkeley UtiUtfes by OPENetwork 
DELTA by OPENetwork 
Desqvfew by a^iwd«* .. 


DOV etail by Dovetai Communications . 

INSTALL by Knowledge Dynamics . , New Version 

Inlei Math Coprocessors Caf hr Pricing. .. 

Opl-Tech Sort by Opt-lech Dala Pfoc ... 

Overlay ToofkH &nal Model, by Uoyd Bush __ 

Periscope Debugger, at Models by Periscope 

Plink86+ twlay ibkec by SageiPofytron _ __ 

PromKH by Amabooks 


QNX Operating System by Quantum Sufiware New 
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Order Processing Department ■ 7249 Whipple Avenue NW • North Canton, Ohio 44720 • USA 


FREE SHIPPING. Orders within the USA flower 48 
status only) arc shipped FREE via UPS Ground. Call 
tor AP0, FPG, PAL and express shipping rates. 

NO CflEOlT CAPO CHARGE. VISA, MasterCard and 
Discover Card are accepted at no extra cosL Your 
card is charged when your order is shipped. Mail 
orders please include expiration date and authorized 
signature. 

NO COD OR P0 FEE. CODs and Purchase Orders 
art accepted at m extra cost. No personal checks 
are accepted on- COD orders. POs with net 30 day 
terras (with initial minimum order of SI 00) are avai l¬ 
able to qualified US accounts only, 


NO SALES TAX. Orders outside of Ohio are not 
charged sales tax. Ohio customers please add 5 % 
Ohio tax or provide proof of tax-exemption 
3D-DAY RETURN POLICY Most of Our products 
come with a 30-day documentation evaluation 
period or a 30-day return privilege. Note that some 
manufacturers restrict us from oltaring return 
privileges on Sheir products. Please consult our 
Buyer's Guide or call for more information 
SOUND ADVICE, Our knowledgeable technical 
staff can answer technical questions, assist In com¬ 
paring products and send you detailed product In¬ 
formation tailored to your needs. 



international ORDERS, Shipping 8 Handling r%r\r\ ann -4 *4 aa 

charges lor international and Canadian orders are I IQ fl KuO-X l '1 nfi 

based on prod uci weigh! Rates are published In UUfl ..... UUU UUU I IUU 

our Buyer's Guide (il you donT have a copy, call or 90 c nfifi 

write for the exact cost) AH payments must be LdHdGd .■■ OUU dZO-1 IDD 

made with U-S funds drawn on a US bank Please Intimations!. 216-494-3781 

inclirde your telephone n umber and FAX number (if r a y 9 -t c_ 4 Q 4 _r p cn 

any). Due to manufacturer and/or government .. . ... 

restrictions, we cannot ship to some countries. 

MAIL ORDERS. Please include your telephone 

number and complete street address on all orders Business Honrs: 8:3D AM to B:CKJ PM Eastern Time Monday - Fntiay 
Spccily computer, operating system, diskette size. Prices. availabiity. terms and conditions are subject to change 

and applicable compiler or hardware interface (s). (feCopynght 1989 Programmer's Connection Incorporated 





















































































































S W A I N E' S FLAMES 


Junk Customers 



2/11/90: Investment hanking firm Drexel Burnham Lambert, home of the junk bond 
phenomenon, informs its employees that it is filing for bankruptcy. 

2/12/90: My cousin Corbett bunches his program for software developers who can’t 
afford the skyrocketing costs of software marketing: Junk Customers, 

Corbett was concerned about the software developer who can’t afford to run large ads 
in the major computer magazines and can't afford to rent lists of prospects. Some 
magazines and some lists will result in more responses and purchases than others, of 
course, and it was while trying to come up with a new measure of the value of these 
sources that Corbett hit on the secret, w hich he calls "Junk Customers/’ 

He look liis inspiration from Mike Milken, the Drexel Burnham Lambert employee who 
made such a splash with junk bonds. Milken noticed that there were a lot of companies 
that had to go to the bank when they wanted money. This w'as bad, he realized. The 
companies tried issuing bonds to get investors to put up money, but investment firms 
such as Drexel el al. steered investors away from these bonds, labeling them +l low ? value.” 
This meant that there was a higher probability that the companies would fail to pay 
up — go out of business or whatever -— than was the case with so-called high-quality 
bonds. The companies tried to make their bonds appealing by increasing the yield —what 
you get back for your investment — and Mike Milken saw this as a good deal He began 
helping his clients to buy a broad selection of these high-yield, low-value bonds, starting 
what became, at its peak, a $200 billion market. 

Corbett has come up with a similar plan for software marketing. (The plan is completely 
general but His loyalty is to die software development community. He wants you to have 
it.) He defines the yield of a source of prospects — a list of names or a page of 
advertising — as the inverse of the CPM (ad sales jargon for “cost per thousand”). Yield 
is how many names you get for a buck. He defines the value of a source as how well the 
source will pull — how likely each name is to result in a sale. The trick, as with junk 
bonds, is to develop a varied portfolio of high-yield, low-value sources. 

Identifying a truly low-value source is tricky. It can't just be a source that is ill-suited to 
your needs; such a source might be able to get a lot of money from someone else. To 
ensure that the yield can be made high enough, this must be a source ill-suited to anyone’s 
needs, a publication or list poorly suited to any commercial advertising or name rental 
purpose. Then there is another problem in dealing with low-quality sources: You’ll need 
a lot of them. The low quality translates into few responses from any one source, and the 
overhead of dealing with hundreds of such companies can easily eat up any gains. 

Corbett thinks he has found the single correct answer to the Junk Customers challenge, 
and is generously allow ing me to pass it on to you: Church newsletters. Every community 
has a church, every church has a newsletter, and every church belongs to some large 
national or international organizarion capable of serving as a central clearing house for 
ad sates or list rental. The nonprofit status of churches and their general noncommercial 
slant makes a church newsletter an exceptionally low-value source, Corbett maintains. 

He sees an intriguing wrinkle to the idea of church newsletter subscribers as prospects 
for software sales. Current wisdom says that you should look for software prospects 
among owners of computers. The church newsletter subscribers will include many who 
do not own a computer, apparently non prospects almost by definition. But any good 
marketer know^s to mistrust such self-fulfilling predictions, and to ask the positive ques¬ 
tion, why would this person want my product? In lJiis case, the answer is surprisingly 
obvious. The industry' lias been doing it backwards! 

Consider: It is much easier to ease a potential customer into a new product category 
with a small purchase than with a large one. One of the reasons many people cite for not 
liuying a PC is that they don't know how to justify spending over a thousand dollars. So 
they buy a Nintendo instead. These people could be buying your CAD package. 

Consider: Anyone who has ever thought about buying a PC has heard the advice, 
"Decide what software you want to run, and then buy the PC that runs that software." 
You’ve probably given that advice, but did you listen to what you were really saying? 

Consider this pitch: For less than tire cost of a Nintendo, you can own the most powerful 
CAD package in the known universe. Now you, too, can design microprocessor circuits, 
draft plans for a new house on the coast, develop a new art form, make your own clothes. 
Required Silicon Graphics IRIS workstation must be purchased separately. 

Remember, you read it here first. 


Michael Swaine 
editor-at-large 
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our customers expect software that works. 
All the time. The key to software quality is 
exhaustive testing. It's also an engineer’s 
worst nightmare. But it doesn’t have to be. 
Because now you can automate your soft¬ 
ware testing. 

Introducing the Atron Evaluator. The first and 
only non-intrusive automated PC-based software 
testing tool. 

The Atron Evaluator automatically runs your soft¬ 
ware regression testing programs. All of them. All 
day. All night. Giving you thoroughly tested, higher 
quality software. 

The Atron Evaluator is hardware-based. And since 
it’s non-intrusive, software behavior is tested with¬ 
out the risk of alteration. Once your tests have run, 
you can refer to automatically generated test reports 
to double-check test results. 

The Atron Evaluator saves time. And time makes 
you money. Development cycles are shortened, so 
your software gets to market sooner. And while your 
test programs are running, you can be more produc¬ 
tive. Start a new project. Or go home. 

For more information about the Atron Evaluator, 
call us at 1-800-283-5933- And put an end to your 
worst nightmares. Automatically, 


A Division of CADRE Technologies 


Saratoga Office Center 
12950 Saratoga Avenue 
Saratoga, California 95070 


In Euro|i«, contact: 

HEverex Limited, Enterprise House 
Plassev Technology Park, Limerick, Ireland 
Phone: Of>L-BH177 

Q A Training United. Cecily Hill Cast It 
Cirencester, Gloucestershire, (iL7 2EF, England 
Phone: (0285> 5888 
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PC WEEK ROLL: C COMPILE 



"Mioosofi ms No. 1< 


L’’PC Week. MayS, I9S9 


PC WEEK POLL: SOFTWARE DEBUGGERS 



Overall 

Weighted 

Score 

(tariff 

Reliability 

WecttYi 

Programmer 

Interlace 

Clarity 

Complete 
Command 
De script. 

Complete. A 
Organize. 
Document 

Overall 

Perform. 

integration Within 
Programming 
Environment 

C Compiler 
Compatibility 

Product 

Support 

Quality 

Product 

Support 

Access 

Valve 
Relative 
J& Cost 

Turbo Debugger 1.0 
(Borland 

International) 

84 

89 

90 

81 

81 

81 

89 

88 

81 

73 

72 

93 

CodeView 2.2 
(Microsoft Corp.) 

73 

80 

71 

72 

74 

74 

74 

74 

78 

67 

64 

72 


"Borland's Debugger outshines Microsoft's Codeview. ”PC Week, May 15 1 1989 


It’s two winners in one. 


Turbo C,* the core of Turbo C 
Professional, was the outright winner in 
PC Week's Poll of Corporate Satisfaction 
on C compilers. Overall, Borland won 
with 81. Microsoft* placed second. 

Turbo Debugger; also included in 
Turbo C Professional, was the outright 
winner in EVERY category in PC Week s 
Poll Of Corporate Satisfaction on 
Debuggers. And, once again, we topped 
the score with 84, overall. Microsoft 
came in second-best, 11 points behind. 

Get Borland’s Turbo C 
Professional and get the best of both 
worlds: our top-rated C compiler and our 
top-rated Debugger. 


Call (800) 345-2888* and we’ll 
send you both PC Week polls and tech¬ 
nical specifications on Turbo C and 
Turbo Debugger. 


TurboC 
Professional 
includes both 
Turbo C 2.0 and 
Turbo 

Assembler 8 & 
Debugger. 


TURBO C 

PROFESSION 



BORLAND 

COOE-Mcsel 

—_L — — 1 _.. __ <-.r-i-nLr'non 





















































